diff options
Diffstat (limited to '.emacs.d/init.el')
| -rw-r--r-- | .emacs.d/init.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 0ad77a61..e7e5a97a 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -58,7 +58,7 @@ (expand-file-name "initlibs/" user-emacs-directory)) t) -;; gdbmacs loads Gnus out of ~/src/emacs/primary/, if it's there. +;; gdbmacs loads Gnus out of ~/src/emacs/primary/, if it's there & compiled. (when (string= (daemonp) "gdbmacs") (let ((gnus-primary (expand-file-name "~/src/emacs/primary/lisp/gnus/"))) (when (file-directory-p gnus-primary) @@ -67,7 +67,11 @@ (gnus-lib-cons (or (member (directory-file-name gnus-lib-dir) load-path) (member gnus-lib-dir load-path)))) - (rplaca gnus-lib-cons (directory-file-name gnus-primary)))))) + (cl-loop for f in (directory-files-recursively gnus-primary + emacs-lisp-file-regexp) + always (file-exists-p (byte-compile-dest-file f)) + finally (rplaca gnus-lib-cons + (directory-file-name gnus-primary))))))) (require 'cl-lib) (require 'subr-x) |