diff options
author | Tom Willemsen | 2011-05-27 21:46:43 +0200 |
---|---|---|
committer | Tom Willemsen | 2011-05-27 21:46:43 +0200 |
commit | b27fef4711fbfb7c731c0ff093145d602ffdb648 (patch) | |
tree | 761da7c697c9d4f409a058a9c121adca092a3483 /emacs | |
parent | 913844f26fbde56d9cfe180f19abe720709f427b (diff) | |
download | dotfiles-b27fef4711fbfb7c731c0ff093145d602ffdb648.tar.gz dotfiles-b27fef4711fbfb7c731c0ff093145d602ffdb648.zip |
Change emacs init variables
Diffstat (limited to 'emacs')
-rw-r--r-- | emacs | 17 |
1 files changed, 8 insertions, 9 deletions
@@ -7,26 +7,25 @@ (setq d-dir "~/.emacs.d/") (setq elisp-dir (concat d-dir "elisp/")) -(setq my-files (directory-files d-dir nil "^[0-9]\\{2\\}-\.*el$")) -(setq my-elisp-files - (directory-files elisp-dir nil "\\.el$")) +(setq d-el-files (directory-files d-dir nil "^[0-9]\\{2\\}-\.*el$")) +(setq elisp-el-files (directory-files elisp-dir nil "\\.el$")) ;; Compile 3rd party elisp files (byte-recompile-directory elisp-dir) -(while my-elisp-files - (let ((my-elisp-file-name (concat elisp-dir (car my-elisp-files)))) +(while elisp-el-files + (let ((my-elisp-file-name (concat elisp-dir (car elisp-el-files)))) (if (not (file-exists-p (concat my-elisp-file-name "c"))) (byte-compile-file my-elisp-file-name)) - (setq my-elisp-files (cdr my-elisp-files)))) + (setq elisp-el-files (cdr elisp-el-files)))) ;; Compile my elisp files (byte-recompile-directory d-dir) -(while my-files - (let ((my-file-name (concat d-dir (car my-files)))) +(while d-el-files + (let ((my-file-name (concat d-dir (car d-el-files)))) (if (not (file-exists-p (concat my-file-name "c"))) (byte-compile-file my-file-name)) (load (substring my-file-name 0 (- (length my-file-name) 3))) - (setq my-files (cdr my-files)))) + (setq d-el-files (cdr d-el-files)))) (add-to-list 'compilation-finish-functions 'my-comp-finish-function) |