From 5dd40c4b100389da00da04a27418c008705c00b0 Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Tue, 28 May 2019 09:57:13 +0200 Subject: Emacs: fix startup error --- emacs/.emacs.d/main.el | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el index bc929da0..68980fae 100644 --- a/emacs/.emacs.d/main.el +++ b/emacs/.emacs.d/main.el @@ -139,13 +139,6 @@ ;;;;; Colours (load-theme 'spacemacs-light t) -(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))) ;; Highlighting quasi-quoted expressions in lisps is quite useful, but I ;; don't need it all the time. I'll keep it around for a while so that I @@ -154,6 +147,14 @@ (global-hl-line-mode +1) +(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))) + ;;;;; Fonts ;; When possible, set up fonts. I don’t have any settings here for X11, -- cgit 1.4.1