blob: 1b5abdf795f6edaa4a04785e8406aa3d43757eab (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
;; -*- mode: Emacs-Lisp; eval: (git-auto-commit-mode 1) -*-
(require 'bytecomp)
(defvar startup-files
(directory-files "~/.emacs.d/startup/" t "^[^.].*\\.el$")
"A list of the files that should be loaded during startup.")
(while startup-files
(let ((filename (car startup-files))
(byte-compile-warnings nil))
(if (not (eq (byte-recompile-file filename nil 0) nil))
(load (substring filename 0 -3))))
(setq startup-files (cdr startup-files)))
|