forked from sandhu/emacs.d
-
Notifications
You must be signed in to change notification settings - Fork 0
/
init.el
88 lines (78 loc) · 4.36 KB
/
init.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
(setq ns-use-srgb-colorspace nil)
;; Remove the UI
;; (dolist (mode '(menu-bar-mode tool-bar-mode scroll-bar-mode))
;; (when (fboundp mode) (funcall mode -1)))
(dolist (mode '(tool-bar-mode scroll-bar-mode))
(when (fboundp mode) (funcall mode -1)))
(setq inhibit-startup-message t)
(set-fringe-mode '(1 . 1))
(setq use-dialog-box nil)
;; Make sure path is correct when launched as application
(setenv "PATH" (concat "/usr/local/bin:/Library/TeX/texbin:" (getenv "PATH")))
(push "/usr/local/bin" exec-path)
;; Setup the package management
(require 'package)
(setq package-enable-at-startup nil)
(setq package-user-dir "~/.emacs.d/elpa/")
(add-to-list 'package-archives '("melpa-stable" . "http://stable.melpa.org/packages/") t)
(add-to-list 'package-archives '("melpa" . "http://melpa.org/packages/") t)
(package-initialize)
;; Bootstrap 'use-package'
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
(require 'use-package)
;; Load the configuration
(let ((custom-file (expand-file-name "emacs-custom.el" user-emacs-directory))
(user-config-file (expand-file-name (concat user-login-name ".el") user-emacs-directory)))
(when (file-exists-p custom-file) (load custom-file))
(dolist (dir (list "lisp" "config" user-login-name))
(let ((config-dir (expand-file-name dir user-emacs-directory)))
(when (file-exists-p config-dir)
(add-to-list 'load-path config-dir)
(mapc 'load (directory-files config-dir nil "^[^#].*el$")))))
(when (file-exists-p user-config-file) (load user-config-file)))
;; Run the emacs server
(use-package server
:if window-system
:init (add-hook 'after-init-hook 'server-start t))
(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.
'(default ((t (:inherit nil :stipple nil :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 100 :width normal :foundry "apple" :family "Menlo"))))
'(eval-sexp-fu-flash ((t (:foreground "green4" :weight bold)))))
;;(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.
;; '(package-selected-packages
;; (quote
;; (which-key yaml-mode wgrep-ag web-mode use-package transpose-frame string-utils solarized-theme smex smartscan shell-pop reveal-in-osx-finder rainbow-mode rainbow-delimiters projectile powerline markdown-mode+ magit lua-mode lorem-ipsum js2-mode ido-completing-read+ ibuffer-vc goto-chg git-gutter-fringe flx-ido expand-region es-mode emmet-mode elisp-slime-nav dockerfile-mode docker diminish company-quickhelp company-flx clojure-mode-extra-font-locking cljsbuild-mode clj-refactor cider-eval-sexp-fu buffer-move browse-kill-ring beginend avy ag)))
;; '(shell-pop-shell-type
;; (quote
;; ("eshell" "*eshell*"
;; (lambda nil
;; (eshell shell-pop-term-shell)))))
;; '(shell-pop-universal-key "M-`")
;; '(shell-pop-window-position "top")
;; '(shell-pop-window-size 100))
(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.
'(package-selected-packages
(quote
(aggressive-indent yaml-mode which-key wgrep-ag web-mode use-package transpose-frame string-utils solarized-theme smex smartscan shell-pop reveal-in-osx-finder rainbow-mode rainbow-delimiters projectile powerline markdown-mode+ magit lua-mode lorem-ipsum js2-mode ido-completing-read+ ibuffer-vc guide-key goto-chg git-gutter-fringe flx-ido expand-region es-mode emmet-mode elisp-slime-nav dockerfile-mode docker diminish company-quickhelp clojure-mode-extra-font-locking cljsbuild-mode clj-refactor cider-eval-sexp-fu buffer-move browse-kill-ring beginend avy ag)))
'(safe-local-variable-values (quote ((cider-shadow-cljs-default-options . "app"))))
'(shell-pop-shell-type
(quote
("eshell" "*eshell*"
(lambda nil
(eshell shell-pop-term-shell)))))
'(shell-pop-universal-key "M-`")
'(shell-pop-window-position "top")
'(shell-pop-window-size 100))