From 7e5e35f66df30db7baa4dbee3f401395a498d99b Mon Sep 17 00:00:00 2001 From: "peter.selby@bytedance.com" Date: Fri, 10 Nov 2023 09:51:21 -0800 Subject: [PATCH] Just copy the site.d config --- config.el | 19 ++++++++++--------- 1 file changed, 10 insertions(+), 9 deletions(-) diff --git a/config.el b/config.el index 74fbe5b..4c51749 100644 --- a/config.el +++ b/config.el @@ -160,16 +160,17 @@ (message "Skipping invalid file %s" full-file)))))) (let ((local-dir (if (getenv "DOOM_EMACS_LOCAL_PATH") - (getenv "DOOM_EMACS_LOCAL_PATH") - (expand-file-name ".local/emacs" (getenv "HOME"))))) - (let ((configs (filter (lambda (name) (not (or (string-match "~$" name) - (string-match "^[.]" name))) - (directory-files local-dir))))) - (dolist (config configs) - (let ((full-file (expand-file-name file site-dir))) + (getenv "DOOM_EMACS_LOCAL_PATH") + (expand-file-name ".local/emacs.d/" (getenv "HOME"))))) + (let ((configs (filter (lambda (name) + (not (or (string-match "~$" name) + (string-match "^[.]" name)))) + (directory-files local-dir)))) + (dolist (file configs) + (let ((full-file (expand-file-name file local-dir))) (if (or (file-regular-p full-file) (file-symlink-p full-file)) - (progn (message "Loading file %s" full-file) - (load full-file)) + (progn (message "Loading file %s" full-file) + (load full-file)) (message "Skipping invalid file %s" full-file)))))) (provide 'config)