emacs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27

;; -*- mode: Emacs-Lisp; -*-

(setq load-dir "~/.emacs.d/")
(setq myfiles (directory-files load-dir nil "^[0-9]\\{2\\}-\.*el$"))

(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))))

(add-to-list 'compilation-finish-functions 'my-comp-finish-function)

(custom-set-variables
 ;; 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.
 '(org-agenda-files (quote ("~/Documents/main.org" "~/Documents/aethon/aethon.org")))
 '(safe-local-variable-values (quote ((ispell-local-dictionary . nl)))))
(custom-set-faces
 ;; 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.
 )