summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2019-06-04 15:23:00 +0200
committerAlan Pearce2019-06-04 15:23:00 +0200
commit3f3b5f6787054858ecf5e231cd155028b4d1d60c (patch)
tree5d5811f3b79cb12eee02304b0b90860566a8de98
parent8ff4a39bf02764295f948754efbe25c4d5ac8b67 (diff)
downloaddotfiles-3f3b5f6787054858ecf5e231cd155028b4d1d60c.tar.lz
dotfiles-3f3b5f6787054858ecf5e231cd155028b4d1d60c.tar.zst
dotfiles-3f3b5f6787054858ecf5e231cd155028b4d1d60c.zip
Emacs: Fix startup errors
-rw-r--r--emacs/.emacs.d/main.el6
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