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

defvar narf-term-theme

Browse source
This commit is contained in:
Henrik Lissner 2015-11-02 21:40:50 -05:00
parent d5d1d29d5a
commit aa65b19e1f
2 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
core/lib/defuns-ui.el
View file

@ -28,7 +28,7 @@
;;;###autoload ;;;###autoload
(defun narf/reset-theme () (defun narf/reset-theme ()
(interactive) (interactive)
(load-theme narf-theme t)) (load-theme (if window-system narf-theme narf-term-theme) t))
;;;###autoload ;;;###autoload
(defun narf/default-font () (defun narf/default-font ()

3
init.el
View file

@ -41,6 +41,7 @@
;;; License: GPLv3 ;;; License: GPLv3
(defconst narf-theme 'narf-dark) (defconst narf-theme 'narf-dark)
(defconst narf-term-theme 'wombat)
(defconst narf-default-font (font-spec :family "DejaVu Sans Mono" :size 12)) (defconst narf-default-font (font-spec :family "DejaVu Sans Mono" :size 12))
(defconst narf-big-font (font-spec :family "Ubuntu Mono" :size 18)) (defconst narf-big-font (font-spec :family "Ubuntu Mono" :size 18))
@ -50,7 +51,7 @@
;; prematurely optimize for faster startup ;; prematurely optimize for faster startup
(let (file-name-handler-alist) (let (file-name-handler-alist)
(load (concat user-emacs-directory "init-load-path.el")) (load (concat user-emacs-directory "init-load-path.el"))
(load-theme narf-theme t) (load-theme (if window-system narf-theme narf-term-theme) t)
(mapc 'require (mapc 'require
`(core ; core/core.el `(core ; core/core.el