diff options
author | Blendoit <blendoit@gmail.com> | 2020-10-06 21:27:06 -0700 |
---|---|---|
committer | Blendoit <blendoit@gmail.com> | 2020-10-06 21:27:06 -0700 |
commit | be656cafda5c78cdd707475236e628ec9c5e4e13 (patch) | |
tree | f70deb67effd7389cb641f9fee86e2344f2a8211 /init.el | |
parent | ee826b2e1d84f35406b3885607caa13e143ec482 (diff) |
Byte-compiled literate config! <3
Diffstat (limited to 'init.el')
-rw-r--r-- | init.el | 15 |
1 files changed, 7 insertions, 8 deletions
@@ -5,18 +5,17 @@ ;;; Code: - ;; First of all, we indicate the path to our literate configuration file. -(setq my/literate-config (concat user-emacs-directory "smart-documents")) +(setq my/literate-config (concat user-emacs-directory "smart-documents.org")) ;; Emacs will startup faster next time, because it will load ;; a byte-compiled version of our literate configuration file. -(cond ((file-exists-p (concat my/literate-config ".elc")) - (load (concat my/literate-config ".elc"))) - ((file-exists-p (concat my/literate-config ".el")) - (load (concat my/literate-config ".el"))) - ((file-exists-p (concat my/literate-config ".org")) - (org-babel-load-file (concat my/literate-config ".org"))) +(cond ((file-exists-p (concat (file-name-sans-extension my/literate-config) ".elc")) + (load (concat (file-name-sans-extension my/literate-config) ".elc"))) + ((file-exists-p (concat (file-name-sans-extension my/literate-config) ".el")) + (load (concat (file-name-sans-extension my/literate-config) ".el"))) + ((file-exists-p my/literate-config) + (org-babel-load-file my/literate-config)) (t (message "There appears to be no literate configuration file. Reinstall?"))) (provide 'init) |