diff options
| author | Alan Pearce | 2019-06-04 15:23:00 +0200 |
|---|---|---|
| committer | Alan Pearce | 2019-06-04 15:23:00 +0200 |
| commit | 3f3b5f6787054858ecf5e231cd155028b4d1d60c (patch) | |
| tree | 5d5811f3b79cb12eee02304b0b90860566a8de98 /emacs/.emacs.d | |
| parent | 8ff4a39bf02764295f948754efbe25c4d5ac8b67 (diff) | |
| download | dotfiles-3f3b5f6787054858ecf5e231cd155028b4d1d60c.tar.lz dotfiles-3f3b5f6787054858ecf5e231cd155028b4d1d60c.tar.zst dotfiles-3f3b5f6787054858ecf5e231cd155028b4d1d60c.zip | |
Emacs: Fix startup errors
Diffstat (limited to 'emacs/.emacs.d')
| -rw-r--r-- | emacs/.emacs.d/main.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el index af6edb2..fa04be0 100644 --- a/emacs/.emacs.d/main.el +++ b/emacs/.emacs.d/main.el @@ -99,6 +99,7 @@ ;; definition. (eval-and-compile + (require 'subr-x) (use-package hook-helpers)) ;;;; Customize @@ -147,13 +148,14 @@ (global-hl-line-mode +1) -(let ((line (face-attribute 'mode-line :underline))) +(define-hook-helper first-frame () + (let ((line (face-attribute 'mode-line :underline))) (set-face-attribute 'mode-line nil :overline line) (set-face-attribute 'mode-line-inactive nil :overline line) (set-face-attribute 'mode-line-inactive nil :underline line) (set-face-attribute 'mode-line nil :box nil) (set-face-attribute 'mode-line-inactive nil :box nil) - (set-face-attribute 'mode-line-inactive nil :background (face-attribute 'hl-line :background))) + (set-face-attribute 'mode-line-inactive nil :background (face-attribute 'hl-line :background)))) ;;;;; Fonts |