legacy-dotfiles/emacs
2011-04-26 09:29:03 +02:00

46 lines
1.8 KiB
Text

;; -*- mode: Emacs-Lisp; -*-
(add-to-list 'load-path "~/.emacs.d/elisp")
(add-to-list 'load-path "~/.emacs.d/naquadah-theme")
(add-to-list 'load-path "~/.emacs.d/elisp/markdown-mode")
(add-to-list 'load-path "~/.emacs.d/elisp/git-commit-mode")
(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$"))
;; 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))))
(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))))
;; Compile my elisp files
(byte-recompile-directory d-dir)
(while my-files
(let ((my-file-name (concat d-dir (car my-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))))
(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/org/main.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.
)
(put 'narrow-to-region 'disabled nil)