2011-01-01 03:11:16 +01:00
|
|
|
;; -*- mode: Emacs-Lisp; -*-
|
2010-12-05 12:41:38 +01:00
|
|
|
|
2011-02-21 00:27:43 +01:00
|
|
|
(setq load-dir "~/.emacs.d/")
|
2011-03-07 09:03:50 +01:00
|
|
|
(setq myfiles (directory-files load-dir nil "^[0-9]\\{2\\}-\.*el$"))
|
2010-12-05 12:41:38 +01:00
|
|
|
|
2011-02-21 00:27:43 +01:00
|
|
|
(while myfiles
|
|
|
|
(let ((myfilename (concat load-dir (car myfiles))))
|
|
|
|
(if (not (file-exists-p (concat myfilename "c")))
|
|
|
|
(byte-compile-file myfilename))
|
|
|
|
(load (substring myfilename 0 (- (length myfilename) 3)))
|
|
|
|
(setq myfiles (cdr myfiles))))
|
2010-12-05 12:41:38 +01:00
|
|
|
|
|
|
|
(add-to-list 'compilation-finish-functions 'my-comp-finish-function)
|
|
|
|
|
|
|
|
(custom-set-variables
|
2011-02-21 00:27:43 +01:00
|
|
|
;; custom-set-variables was added by Custom.
|
|
|
|
;; If you edit it by hand, you could mess it up, so be careful.
|
|
|
|
;; Your init file should contain only one such instance.
|
|
|
|
;; If there is more than one, they won't work right.
|
2011-03-17 11:16:50 +01:00
|
|
|
'(org-agenda-files (quote ("~/org/notes.org" "~/Documents/main.org" "~/Documents/aethon/aethon.org")))
|
2011-03-07 09:03:50 +01:00
|
|
|
'(safe-local-variable-values (quote ((ispell-local-dictionary . nl)))))
|
2010-12-05 12:41:38 +01:00
|
|
|
(custom-set-faces
|
2011-02-21 00:27:43 +01:00
|
|
|
;; custom-set-faces was added by Custom.
|
|
|
|
;; If you edit it by hand, you could mess it up, so be careful.
|
|
|
|
;; Your init file should contain only one such instance.
|
|
|
|
;; If there is more than one, they won't work right.
|
|
|
|
)
|