git.fiddlerwoaroof.com
Browse code

chore(emacs): move load-package-configuration to init.el

fiddlerwoaroof authored on 10/02/2020 00:41:07
Showing 2 changed files
... ...
@@ -92,7 +92,18 @@
92 92
 (defvar fwoar-git-mode :ssh)
93 93
 (when (locate-library "site-lisp")
94 94
   (load "site-lisp"))
95
+(defun load-package-configuration (package)
96
+  (let* ((local-configs "~/.emacs.d/lisp/configurations/")
97
+         (git-configs (concat *dotfiles-repo*
98
+                              "emacs.d/lisp/configurations/"))
99
+         (conf-file (concat (symbol-name package) "-conf.el"))
100
+         (load-path (list* local-configs git-configs load-path)))
101
+    (load conf-file)))
102
+
95 103
 (load-package-configuration 'evil)
104
+;; slime depends on fwoar-git-repo
105
+(load-package-configuration 'slime)
106
+(load-package-configuration 'cider)
96 107
 
97 108
 
98 109
 ;;(use-package multifiles
... ...
@@ -504,9 +515,6 @@ With a prefix ARG invalidates the cache first."
504 515
                   "git@git.fiddlerwoaroof.com:dotfiles.git"
505 516
                   "https://git.fiddlerwoaroof.com/git/dotfiles.git"))
506 517
 
507
-;; slime depends on fwoar-git-repo
508
-(load-package-configuration 'cider)
509
-(load-package-configuration 'slime)
510 518
 (global-company-mode 1)
511 519
 
512 520
 
... ...
@@ -87,11 +87,6 @@ started from a shell."
87 87
     (setenv "PATH" path-from-shell)
88 88
     (setq exec-path (split-string path-from-shell path-separator))))
89 89
 
90
-(defun load-package-configuration (package)
91
-  (load (concat "~/.emacs.d/lisp/configurations/"
92
-                (symbol-name package)
93
-                "-conf.el")))
94
-
95 90
 (defmacro ensure-use-packages (&rest packages)
96 91
   (list* 'progn
97 92
          (mapcar (lambda (pck)