feat(emacs/programming): remove unused configuration

Especially useful when using Nix develompent shells and when LSP
servers would otherwise not be available.

docs/emacs/basic-config.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Basic Configuration
 #+setupfile: ../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/basic-config.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/basic-config.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Basic Configuration

docs/emacs/custom-elisp.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Custom Elisp
 #+setupfile: ../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/custom-elisp.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/custom-elisp.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Custom Elisp

docs/emacs/index.org

@@ -78,6 +78,8 @@ block.
 #+end_src
 
 ** Loading All Configuration Modules
+Here are all my Emacs configuration modules, each dedicated to a
+specific aspect of my Emacs configuration.
 
 #+name: emacs-modules
 | Module Name            | Config Page                      |
@@ -98,27 +100,58 @@ block.
 | =visual-config.el=       | [[file:./packages/visual-config.org][Packages — Visual Configuration]]  |
 | =keybindings.el=         | [[file:./keybindings.org][Keybindings]]                      |
 
-#+name: generate-modules
+#+name: modules
-#+begin_src emacs-lisp :tangle no :cache yes :var modules=emacs-modules :exports none
+#+begin_src emacs-lisp :tangle no :cache yes :var modules=emacs-modules :exports none :results list
-(mapconcat (lambda (line)
+(mapcar (lambda (module) (string-trim (car module) "=" "="))
-             (concat "\"" (string-trim (car line) "=" "=") "\""))
+        modules)
-           modules
-           " ")
 #+end_src
 
-#+RESULTS[05f9bb535bec2ba84390cc118600323683f51e7c]: generate-modules
+#+RESULTS[1c6034eb268577137e95a6f828c249fc306943b1]: modules
-: "basic-config.el" "custom-elisp.el" "package-manager.el" "keybinding-managers.el" "applications.el" "autocompletion.el" "editing.el" "emacs-builtin.el" "helpful.el" "latex.el" "misc.el" "org.el" "programming.el" "visual-config.el" "keybindings.el"
+- basic-config.el
+- custom-elisp.el
+- package-manager.el
+- keybinding-managers.el
+- applications.el
+- autocompletion.el
+- editing.el
+- emacs-builtin.el
+- helpful.el
+- latex.el
+- misc.el
+- org.el
+- programming.el
+- visual-config.el
+- keybindings.el
 
-#+begin_src emacs-lisp :noweb yes
+The first thing Emacs does is verify if any of these modules need to
-(dolist (module '(<<generate-modules()>>))
+be byte-compiled again, i.e. if the =.el= file is younger than its
+corresponding =.elc= file. If so, the =.el= file is byte-compiled.
+
+#+begin_src emacs-lisp :var modules=modules :results none
+(defun my/mtime (file)
+  "Get the modification time of FILE as a timestamp."
+  (let* ((current-time-list nil)
+         (attr (file-attributes file))
+         (time-attr (file-attribute-modification-time attr)))
+    (/ (car time-attr) (cdr time-attr))))
+
+;; `modules' is a variable created by org-mode from the table of modules
+(let* ((config-dir (expand-file-name "user-lisp" user-emacs-directory))
+       (modules (mapcar (lambda (module)
+                         (file-name-sans-extension (expand-file-name module config-dir)))
+                        modules)))
+  (dolist (module modules)
+    (let* ((el-file (concat module ".el"))
+           (elc-file (concat module ".elc"))
+           (el-last-change (my/mtime el-file))
+           (elc-last-change (if (file-exists-p elc-file) (my/mtime elc-file) 0)))
+      (when (> el-last-change elc-last-change)
+        (byte-compile-file el-file)))))
+#+end_src
+
+Now we can load them.
+#+begin_src emacs-lisp :var modules=modules :results none
+(dolist (module (mapcar #'file-name-sans-extension modules))
   (load (expand-file-name module
-                          (expand-file-name "lisp" user-emacs-directory))))
+                          (expand-file-name "user-lisp" user-emacs-directory))))
 #+end_src
-
-* TODOs                                                            :noexport:
-** TODO advise ~evil-insert~ in eshell
-Advise ~evil-insert~ to go to the end of the buffer while in
-~eshell-mode~.
-
-** DONE Get started with org-roam
-CLOSED: [2023-06-17 Sat 13:38]

docs/emacs/keybinding-managers.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Keybinding Managers
 #+setupfile: ../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/keybinding-managers.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/keybinding-managers.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Keybinding Managers

docs/emacs/keybindings.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Keybindings
 #+setupfile: ../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/keybindings.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/keybindings.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Keybindings
@@ -263,7 +263,7 @@ I also have some keybindings dedicated to opening specific files.
 "fI"  '((lambda ()
           (interactive)
           (quick-find-files nil
-                            (expand-file-name "lisp" user-emacs-directory)
+                            (expand-file-name "user-lisp" user-emacs-directory)
                             "el"))
         :which-key "elisp config"
         :package quick-find-files)

docs/emacs/package-manager.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Package Manager
 #+setupfile: ../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/package-manager.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/package-manager.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Package Manager

docs/emacs/packages/applications.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Applications
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/applications.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/applications.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Applications

docs/emacs/packages/autocompletion.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Autocompletion
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/autocompletion.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/autocompletion.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Autocompletion

docs/emacs/packages/editing.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Editing
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/editing.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/editing.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 

docs/emacs/packages/emacs-builtin.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Emacs Built-ins
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/emacs-builtin.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/emacs-builtin.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 

docs/emacs/packages/exwm.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — EXWM (Deprecated)
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/exwm.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/exwm.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * EXWM (Deprecated)

docs/emacs/packages/helpful.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Making My Life Easier
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/helpful.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/helpful.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Making my life easier

docs/emacs/packages/latex.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — LaTeX
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/latex.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/latex.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * LaTeX

docs/emacs/packages/misc.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Misc
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/misc.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/misc.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Misc

docs/emacs/packages/org.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Org Mode
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/org.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/org.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Org-mode

docs/emacs/packages/programming.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Programming
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/programming.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/programming.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Programming

docs/emacs/packages/visual-config.org

@@ -1,7 +1,7 @@
 #+title: Emacs — Packages — Visual Configuration
 #+setupfile: ../../headers
 #+property: header-args:emacs-lisp  :mkdirp yes :lexical t :exports code
-#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/lisp/visual-config.el
+#+property: header-args:emacs-lisp+ :tangle ~/.config/emacs/user-lisp/visual-config.el
 #+property: header-args:emacs-lisp+ :mkdirp yes :noweb no-export
 
 * Visual Configuration