emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Remove cask init (faster startup); we only need the loadpaths

Browse source
This commit is contained in:
Henrik Lissner 2015-05-16 23:27:55 -04:00
parent 20f4fdd8d3
commit a8a5e9f540
1 changed files with 20 additions and 25 deletions
Download patch file Download diff file Expand all files Collapse all files

45
init.el
View file

@ -16,35 +16,31 @@
;; * *<defun/var-name> ; for altering the visual state ;; * *<defun/var-name> ; for altering the visual state
;; ;;
;;; Code: ;;; Code:
(defconst DEBUG-MODE nil) (defvar DEBUG-MODE nil)
(defconst my-dir user-emacs-directory) (defvar my-dir user-emacs-directory)
(defconst my-core-dir (concat my-dir "core/")) (defvar my-core-dir (concat my-dir "core/"))
(defconst my-modules-dir (concat my-dir "init/")) (defvar my-modules-dir (concat my-dir "init/"))
(defconst my-contrib-dir (concat my-dir "contrib/")) (defvar my-contrib-dir (concat my-dir "contrib/"))
(defconst my-themes-dir (concat my-dir "themes/")) (defvar my-themes-dir (concat my-dir "themes/"))
(defconst my-snippets-dir (concat my-dir "snippets/")) (defvar my-snippets-dir (concat my-dir "snippets/"))
(defconst my-tmp-dir (concat my-dir ".cache/")) (defvar my-tmp-dir (concat my-dir ".cache/"))
(defconst *dark-theme 'v0) (defvar *dark-theme 'v0)
(defconst *light-theme 'github) ; wtb better light theme... (defvar *light-theme 'github) ; wtb better light theme...
(defconst *fonts `(,(font-spec :family "Terminus (TTF)" :size 12 :antialias nil) (defvar *fonts `(,(font-spec :family "Terminus (TTF)" :size 12 :antialias nil)
,(font-spec :family "Inconsolata" :size 14 :antialias t) ,(font-spec :family "Inconsolata" :size 14 :antialias t)
,(font-spec :family "Ubuntu Mono" :size 20 :antialias t) ,(font-spec :family "Ubuntu Mono" :size 20 :antialias t)
)) ))
(add-to-list 'load-path my-core-dir) (push my-core-dir load-path)
(add-to-list 'load-path my-modules-dir) (push my-modules-dir load-path)
(add-to-list 'load-path my-contrib-dir) (push my-contrib-dir load-path)
;; Add elisp and cask dirs to load-path
;; Add elisp dirs to load-path
(let ((default-directory my-contrib-dir)) (let ((default-directory my-contrib-dir))
(normal-top-level-add-subdirs-to-load-path)) (normal-top-level-add-subdirs-to-load-path))
(let ((default-directory (expand-file-name (concat ".cask/" emacs-version "/elpa/") my-dir)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (normal-top-level-add-subdirs-to-load-path))
(require 'cask)
(cask-initialize)
(require 'use-package) (require 'use-package)
(mapc 'require (mapc 'require
@ -58,7 +54,6 @@
init-auto-insert ; for the lazy typis init-auto-insert ; for the lazy typis
init-company ; see above init-company ; see above
init-dev ; general dev tools/settings init-dev ; general dev tools/settings
;; init-floobits ; when I'm feeling lonely
init-fly ; fly(check|spell) init-fly ; fly(check|spell)
init-git ; git-gutter + modes init-git ; git-gutter + modes
init-ido ; a search engine for your car keys init-ido ; a search engine for your car keys