view .emacs @ 439:2325dea339ca

smailq: vendor script to ease handling outgoing mail From commit 5b83ca873f1dc9117a9b3590f0aa07fe2806fce9 of http://git.sthu.org/repos/smailq.git - documented at https://www.sthu.org/code/smailq.html.
author Augie Fackler <raf@durin42.com>
date Sat, 15 Jul 2017 12:57:17 -0400
parents 9a2541ec4d4d
children 6e5260ca85f2
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: https://ssl.natulte.net/hg/dotfiles/
;  Emacs Starter Kit: http://github.com/technomancy/emacs-starter-kit

; Start the server so that emacsclient will work

;; Added by Package.el.  This must come before configurations of
;; installed packages.  Don't delete this line.  If you don't want it,
;; just comment it out by adding a semicolon to the start of the line.
;; You may delete these explanatory comments.
(package-initialize)

(server-start)

(setq custom-file "~/.elisp/settings/01.custom.el")

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

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