summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-12-07 20:26:25 +0000
committerRichard M. Stallman <rms@gnu.org>1996-12-07 20:26:25 +0000
commitd68b60d7783c2c3a2c0a8420e8e45596e86dc000 (patch)
treeca65952891fbd1a3fb7a8601f76fc42e6cdf1068
parentc16adbd53de18ba0d21afd076bbcca37ebb98a5b (diff)
downloademacs-d68b60d7783c2c3a2c0a8420e8e45596e86dc000.tar.gz
Fixed syntax table for quotes since they messed up
highlighting in comments and other constructions.
-rw-r--r--lisp/progmodes/m4-mode.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/progmodes/m4-mode.el b/lisp/progmodes/m4-mode.el
index c1bf89582e4..a9177ea91e0 100644
--- a/lisp/progmodes/m4-mode.el
+++ b/lisp/progmodes/m4-mode.el
@@ -59,6 +59,8 @@
("\\\$\\\*" . font-lock-variable-name-face)
("\\\$[0-9]" . font-lock-variable-name-face)
("\\\$\\\#" . font-lock-variable-name-face)
+ ("\\\$\\\@" . font-lock-variable-name-face)
+ ("\\\$\\\*" . font-lock-variable-name-face)
("\\b\\(builtin\\|change\\(com\\|quote\\|word\\)\\|d\\(e\\(bug\\(file\\|mode\\)\\|cr\\|f\\(ine\\|n\\)\\)\\|iv\\(ert\\|num\\)\\|nl\\|umpdef\\)\\|e\\(rrprint\\|syscmd\\|val\\)\\|f\\(ile\\|ormat\\)\\|gnu\\|i\\(f\\(def\\|else\\)\\|n\\(c\\(lude\\|r\\)\\|d\\(ex\\|ir\\)\\)\\)\\|l\\(en\\|ine\\)\\|m\\(4\\(exit\\|wrap\\)\\|aketemp\\)\\|p\\(atsubst\\|opdef\\|ushdef\\)\\|regexp\\|s\\(hift\\|include\\|ubstr\\|ys\\(cmd\\|val\\)\\)\\|tra\\(ceo\\(ff\\|n\\)\\|nslit\\)\\|un\\(d\\(efine\\|ivert\\)\\|ix\\)\\)\\b" . font-lock-keyword-face)
("\\b\\(m4_\\(builtin\\|change\\(com\\|quote\\|word\\)\\|d\\(e\\(bug\\(file\\|mode\\)\\|cr\\|f\\(ine\\|n\\)\\)\\|iv\\(ert\\|num\\)\\|nl\\|umpdef\\)\\|e\\(rrprint\\|syscmd\\|val\\)\\|f\\(ile\\|ormat\\)\\|i\\(f\\(def\\|else\\)\\|n\\(c\\(lude\\|r\\)\\|d\\(ex\\|ir\\)\\)\\)\\|l\\(en\\|ine\\)\\|m\\(4\\(_undefine\\|exit\\|wrap\\)\\|aketemp\\)\\|p\\(atsubst\\|opdef\\|ushdef\\)\\|regexp\\|s\\(hift\\|include\\|ubstr\\|ys\\(cmd\\|val\\)\\)\\|tra\\(ceo\\(ff\\|n\\)\\|nslit\\)\\|undivert\\)\\)\\b" . font-lock-keyword-face)
"default font-lock-keywords")
@@ -76,6 +78,7 @@
(modify-syntax-entry ?} "_" m4-mode-syntax-table)
(modify-syntax-entry ?* "w" m4-mode-syntax-table)
(modify-syntax-entry ?_ "w" m4-mode-syntax-table)
+(modify-syntax-entry ?\" "w" m4-mode-syntax-table)
(defvar m4-mode-map
(let ((map (make-sparse-keymap)))