X-Git-Url: https://git.distorted.org.uk/~mdw/profile/blobdiff_plain/502f4699defabcce0ad478ef82e3929d33f3d614..aeeab4127aa50368af29e66eb3af11b3f86d2cf6:/dot-emacs.el

diff --git a/dot-emacs.el b/dot-emacs.el
index 9fe9741..e2e8998 100644
--- a/dot-emacs.el
+++ b/dot-emacs.el
@@ -605,6 +605,9 @@ doesn't cope with anything approximating a complicated case."
     (mdw-number-face :foreground "yellow")
     (font-lock-function-name-face :weight bold)
     (font-lock-variable-name-face :slant italic)
+    (font-lock-comment-delimiter-face
+       :foreground ,(if window-system "SeaGreen1" "green")
+       :slant italic)
     (font-lock-comment-face
        :foreground ,(if window-system "SeaGreen1" "green")
        :slant italic)
@@ -658,7 +661,7 @@ doesn't cope with anything approximating a complicated case."
 				  (label . 0)
 				  (case-label . +)
 				  (access-label . -)
-				  (inclass . ++)
+				  (inclass . +)
 				  (inline-open . ++)
 				  (statement-cont . 0)
 				  (statement-case-intro . +)))
@@ -1936,6 +1939,9 @@ strip numbers instead."
   (and mdw-auto-indent
        (indent-for-tab-command)))
 
+(defun mdw-setup-m4 ()
+  (mdw-standard-fill-prefix "\\([ \t]*\\(?:#+\\|\\<dnl\\>\\)[ \t]*\\)"))
+
 ;;;----- Text mode ----------------------------------------------------------
 
 (defun mdw-text-mode ()