view .emacs @ 153:eb7cb3d25060

Merge
author Augie Fackler <durin42@gmail.com>
date Fri, 09 Oct 2009 21:50:40 -0400
parents 932ae5899ff4
children 8b0932adcaf1
line wrap: on
line source

;; Augie Fackler's .emacs file
; Places I've stolen from:
;  Karl Fogel: http://svn.red-bean.com/repos/kfogel/trunk
;  Dave Anderson:
;  Emacs Starter Kit: http://github.com/technomancy/emacs-starter-kit

(add-to-list 'load-path (expand-file-name "~/.elisp"))

; Start the server so that emacsclient will work
; TODO: is there a way to *not* start a server if one was already running?
(server-start)

(let ((settings-files (concat (getenv "HOME") "/.elisp/settings")))
  (mapc '(lambda (p) (load (concat settings-files "/" p)))
        (directory-files settings-files nil ".*el$")))

(if (file-regular-p (expand-file-name (concat (getenv "HOME")
                                              "/.emacs-machine.el")))
    (load (expand-file-name "~/.emacs-machine.el")))