Permalink
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
17 lines (15 sloc) 629 Bytes
;; Directories and file names
(setq kdk-emacs-init-file (or load-file-name buffer-file-name))
(setq kdk-emacs-config-dir
(file-name-directory kdk-emacs-init-file))
(setq user-emacs-directory kdk-emacs-config-dir)
(setq kdk-elisp-dir (expand-file-name "elisp" kdk-emacs-config-dir))
(setq kdk-elisp-external-dir
(expand-file-name "external" kdk-elisp-dir))
(setq kdk-init-dir
(expand-file-name "init.d" kdk-emacs-config-dir))
;; Load all elisp files in ./init.d
(if (file-exists-p kdk-init-dir)
(dolist (file (directory-files kdk-init-dir t "\\.el$"))
(load file)))
(put 'upcase-region 'disabled nil)