summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2011-05-27 21:46:43 +0200
committerGravatar Tom Willemsen2011-05-27 21:46:43 +0200
commitb27fef4711fbfb7c731c0ff093145d602ffdb648 (patch)
tree761da7c697c9d4f409a058a9c121adca092a3483
parent913844f26fbde56d9cfe180f19abe720709f427b (diff)
downloaddotfiles-b27fef4711fbfb7c731c0ff093145d602ffdb648.tar.gz
dotfiles-b27fef4711fbfb7c731c0ff093145d602ffdb648.zip
Change emacs init variables
-rw-r--r--emacs17
1 files changed, 8 insertions, 9 deletions
diff --git a/emacs b/emacs
index f3e280e..3f6971b 100644
--- a/emacs
+++ b/emacs
@@ -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)