initial version

This commit is contained in:
Rongsong Shen 2018-12-11 16:02:11 +08:00
parent a3a806f89b
commit ee3f58b870

18
init/dot.emacs.el Normal file
View File

@ -0,0 +1,18 @@
(setq emacs-config-name
(let ((config-name (getenv "EMACS_CONFIG")))
(if config-name
config-name
".emacs.d")))
(setq emacs-config-directory
(let ((config-dir (getenv "EMACS_CONFIG_DIR")))
(if config-dir
(concat config-dir "/" emacs-config-name "/")
(concat (substitute-in-file-name "~/.config/emacs")
"/" emacs-config-name "/"))))
(setq user-emacs-directory emacs-config-directory)
(let ((init-file (expand-file-name "init.el" user-emacs-directory)))
(when (file-exists-p init-file)
(load-file init-file)))