Move pre-initialization steps to the top of my config
This commit is contained in:
		| @@ -1,32 +1,30 @@ | ||||
| * Add some directories to ~load-path~ | ||||
| * Pre-init | ||||
|  | ||||
| ** My own (version controlled) ~lisp~ directory | ||||
| ** Add my own, version controlled ~lisp~ directory to ~load-path~ | ||||
|  | ||||
| #+BEGIN_SRC emacs-lisp | ||||
| #+begin_src emacs-lisp | ||||
| (add-to-list 'load-path (expand-file-name | ||||
|                          (convert-standard-filename "lisp/") | ||||
|                          user-emacs-directory)) | ||||
| #+END_SRC | ||||
| #+end_src | ||||
|  | ||||
| ** The local site-lisp | ||||
| ** Do the same with the local ~site-lisp~ if it’s there | ||||
|  | ||||
| …if it exists. | ||||
|  | ||||
| #+BEGIN_SRC emacs-lisp | ||||
| #+begin_src emacs-lisp | ||||
| (let ((site-lisp-dir "/usr/local/share/emacs/site-lisp")) | ||||
|   (when (file-directory-p site-lisp-dir) | ||||
|     (dolist (elt (directory-files site-lisp-dir)) | ||||
|       (unless (or (string= elt ".") (string= elt "..")) | ||||
|         (add-to-list 'load-path (expand-file-name elt site-lisp-dir)))))) | ||||
| #+END_SRC | ||||
|  | ||||
| * Load some prerequisites | ||||
| #+end_src | ||||
|  | ||||
| ** Load ~xdg-paths~ | ||||
|  | ||||
| #+BEGIN_SRC emacs-lisp | ||||
| I prefer using freedesktop’s desktop specification everywhere. | ||||
|  | ||||
| #+begin_src emacs-lisp | ||||
| (load "xdg-paths") | ||||
| #+END_SRC | ||||
| #+end_src | ||||
|  | ||||
| * Emacs configuration | ||||
|  | ||||
|   | ||||
		Reference in New Issue
	
	Block a user