legacy-dotfiles/emacs
Tom Willemsen 62f897fdf5 New .emacs style
* .emacs only loops through .emacs.d and runs the *.el files there.

 * files are automatically compiled before loading. But only if it
   hasn't already been compiled.

 * all emacs el files, save for the startup scripts, have been moved
   to .emacs.d/elisp
2011-02-21 00:27:43 +01:00

37 lines
1.3 KiB
Text

;; -*- mode: Emacs-Lisp; -*-
(setq load-dir "~/.emacs.d/")
(setq myfiles (directory-files load-dir nil ".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"))))
(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.
)
;;; This was installed by package-install.el.
;;; This provides support for the package system and
;;; interfacing with ELPA, the package archive.
;;; Move this code earlier if you want to reference
;;; packages in your .emacs.
(when
(load
(expand-file-name "~/.emacs.d/elpa/package.el"))
(package-initialize))