Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

48 lines (35 sloc) 1.693 kb
(require 'cl)
(load (expand-file-name "~/.emacs.d/config.el") 'noerror)
(if (not custom-file)
(setq custom-file (expand-file-name "~/.emacs.d/custom.el")))
(load custom-file 'noerror)
;; Platform-specific stuff
(when (eq system-type 'darwin)
;; Work around a bug on OS X where system-name is FQDN
(setq system-name (car (split-string system-name "\\."))))
;; You can keep system- or user-specific customizations here
(setq local-config (expand-file-name "~/.emacs.d/local.el")
system-specific-config (expand-file-name (concat "~/.emacs.d/machines/" system-name ".el"))
user-specific-config (expand-file-name (concat"~/.emacs.d/users/" user-login-name ".el")))
(load (concat cabbage-repository "lib/variables"))
(if (file-exists-p system-specific-config) (load system-specific-config))
(if (file-exists-p user-specific-config) (load user-specific-config))
(if (file-exists-p local-config) (load local-config) )
(add-to-list 'load-path cabbage-repository)
(load (concat cabbage-repository "lib/bundles/framework"))
(load (concat cabbage-repository "lib/defun"))
(load (concat cabbage-repository "lib/setup"))
(load (concat cabbage-repository "lib/perspective"))
(load (concat cabbage-repository "lib/compilation"))
(load (concat cabbage-repository "lib/modes"))
(cond
((string-match "nt" system-configuration)
(load "lib/platforms/windows"))
((string-match "apple" system-configuration)
(load "lib/platforms/mac")))
(run-hooks 'cabbage-pre-bundle-hook)
(dolist (bundle cabbage-bundles)
(cabbage-load-bundle bundle))
;; TODO: load this earlier and debug the weird error
(load (concat cabbage-repository "lib/themes"))
(run-hooks 'cabbage-initialized-hook)
Jump to Line
Something went wrong with that request. Please try again.