From: Mark Wooding <mdw@distorted.org.uk>
Date: Tue, 25 Apr 2023 22:37:49 +0000 (+0100)
Subject: el/dot-emacs.el: Hack on the faces used for compilations.
X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/855b4fd820c497e02b2bdb365584d6fcaa905d79

el/dot-emacs.el: Hack on the faces used for compilations.

Make the errors be actually red.  Turn off the wretched underlining.
---

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index f5669d3..7dfcdd2 100644
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -1818,6 +1818,21 @@ doesn't match any of the regular expressions in
   (t :inverse-video t))
 (mdw-define-face viper-search (t :inherit isearch))
 
+(mdw-define-face compilation-error
+  (((class color)) :foreground "red" :weight bold)
+  (t :weight bold))
+(mdw-define-face compilation-warning
+  (((class color)) :foreground "orange" :weight bold)
+  (t :weight bold))
+(mdw-define-face compilation-info
+  (((class color)) :foreground "green" :weight bold)
+  (t :weight bold))
+(mdw-define-face compilation-line-number
+  (t :weight bold))
+(mdw-define-face compilation-column-number
+  (((min-colors 64)) :foreground "lightgrey"))
+(defvar compilation-message-face 'mdw-virgin-face)
+
 (mdw-define-face holiday-face
   (t :background "red"))
 (mdw-define-face calendar-today-face