Skip to content

Loading…

Look for system specific config dir #111

Closed
wants to merge 1 commit into from

2 participants

@mamciek

I have extended your code so that it searches for system specific config dir (instead of only flat file) - just like user specific dir. Now any system specific config may be more modular

@technomancy
Owner

Thanks, but this project is currently deprecated.

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Commits on Mar 26, 2012
  1. @mamciek

    Look for system specific config dir

    mamciek committed with Maciej Mazur
Showing with 6 additions and 0 deletions.
  1. +6 −0 starter-kit.el
View
6 starter-kit.el
@@ -48,9 +48,13 @@
;; You can keep system- or user-specific customizations here
(setq esk-system-config (concat user-emacs-directory system-name ".el")
+ esk-system-dir (concat user-emacs-directory system-name)
esk-user-config (concat user-emacs-directory user-login-name ".el")
esk-user-dir (concat user-emacs-directory user-login-name))
+ (add-to-list 'load-path esk-system-dir)
+ (add-to-list 'load-path esk-user-dir)
+
(setq smex-save-file (concat user-emacs-directory ".smex-items"))
(smex-initialize)
(global-set-key (kbd "M-x") 'smex)
@@ -67,6 +71,8 @@
(esk-eval-after-init
'(progn
(when (file-exists-p esk-system-config) (load esk-system-config))
+ (when (file-exists-p esk-system-dir)
+ (mapc 'load (directory-files esk-system-dir nil "^[^#].*el$")))
(when (file-exists-p esk-user-config) (load esk-user-config))
(when (file-exists-p esk-user-dir)
(mapc 'load (directory-files esk-user-dir nil "^[^#].*el$"))))))
Something went wrong with that request. Please try again.