colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

More theming changes

Browse Source
This commit is contained in:
Ivan Malison 2015-08-16 16:43:38 -07:00
parent c487d19552
commit 13fb8992e1
2 changed files with 9 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
dotfiles/emacs.d/init.el
View File

@ -2070,12 +2070,6 @@ window is active in the perspective."
(setq left-margin-width 0) (setq left-margin-width 0)
(defvar-setq hl-line-mode nil)) (defvar-setq hl-line-mode nil))
(when t
(if (emacs24_4-p)
(advice-add 'load-theme :after #'imalison:remove-fringe-and-hl-line-mode)
(defadvice load-theme (after name activate)
(imalison:remove-fringe-and-hl-line-mode))))
(when (file-exists-p custom-after-file) (load custom-after-file)) (when (file-exists-p custom-after-file) (load custom-after-file))
(defun imalison:appearance (&optional frame) (defun imalison:appearance (&optional frame)
@ -2085,14 +2079,18 @@ window is active in the perspective."
(progn (progn
(set-face-attribute 'default nil :font "Source Code Pro") (set-face-attribute 'default nil :font "Source Code Pro")
(set-face-attribute 'default nil :weight 'semi-bold) (set-face-attribute 'default nil :weight 'semi-bold)
(set-face-attribute 'default nil :height 135))) (set-face-attribute 'default nil :height 135))
(progn
(load-theme 'source-code-pro t)
(message "not setting font")))
(load-theme imalison:my-theme t) (load-theme imalison:my-theme t)
(imalison:remove-fringe-and-hl-line-mode)) (imalison:remove-fringe-and-hl-line-mode)
(message "finished set appearance"))
;; This is needed because you can't set the font or theme at daemon start-up. ;; This is needed because you can't set the font or theme at daemon start-up.
;; (when (display-graphic-p) (imalison:appearance))
(add-hook 'after-init-hook 'imalison:appearance)
(add-hook 'after-make-frame-functions 'imalison:appearance) (add-hook 'after-make-frame-functions 'imalison:appearance)
;; (add-hook 'after-init-hook 'imalison:appearance)
;; Local Variables: ;; Local Variables:
;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc)
;; End: ;; End:

2
dotfiles/emacs.d/source-code-pro-theme.el
View File

@ -7,6 +7,6 @@
(custom-theme-set-faces (custom-theme-set-faces
'source-code-pro 'source-code-pro
'(default ((t (:width normal :height 120 :weight normal :slant normal :foundry "nil" :family "Source Code Pro" :background nil))))) '(default ((t (:width normal :height 135 :weight semi-bold :slant normal :foundry "nil" :family "Source Code Pro" :background nil)))))
(provide-theme 'source-code-pro) (provide-theme 'source-code-pro)