Ensure site subdirs.el are loaded

This commit is contained in:
Henrik Lissner 2020-11-20 13:36:37 -05:00
parent 4dab595ad3
commit 03c6a352bf
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -71,6 +71,11 @@
;; HACK Load `cl' and site files manually to prevent polluting logs and stdout ;; HACK Load `cl' and site files manually to prevent polluting logs and stdout
;; with deprecation and/or file load messages. ;; with deprecation and/or file load messages.
(quiet! (if EMACS27+ (require 'cl)) (quiet! (if EMACS27+ (require 'cl))
(let ((tail load-path))
(while tail
(let ((default-directory (car tail)))
(load (expand-file-name "subdirs.el") t t t)
(setq tail (cdr tail)))))
(load "site-start" t t)) (load "site-start" t t))
(kill-emacs (kill-emacs