Mercurial > emacs

changeset 25624:39262276b212

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(bat-generic-mode): "::"-style comments don't need to begin with "-". Fix the font-lock definitions of ON/OFF after BREAK/VERIFY. Remove built-in commands like CALL and ECHO from the list of keywords. Add DO to the list of keywords.
author Richard M. Stallman <rms@gnu.org>
date Thu, 09 Sep 1999 21:03:07 +0000
parents 0f4f299cebb2
children c0e27d3ce645
files lisp/generic-x.el
diffstat 1 files changed, 3 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/generic-x.el	Thu Sep 09 20:16:02 1999 +0000
+++ b/lisp/generic-x.el	Thu Sep 09 21:03:07 1999 +0000
@@ -301,11 +301,11 @@
      ;; Make this one first in the list, otherwise comments will
      ;; be over-written by other variables
      (list "^[@ \t]*\\([rR][eE][mM][^\n\r]*\\)" 1 'font-lock-comment-face t)
-     (list "^[ \t]*\\(::-.*\\)"		        1 'font-lock-comment-face t)
+     (list "^[ \t]*\\(::.*\\)"		        1 'font-lock-comment-face t)
      (list
       "^[@ \t]*\\([bB][rR][eE][aA][kK]\\|[vV][eE][rR][iI][fF][yY]\\)[ \t]+\\([oO]\\([nN]\\|[fF][fF]\\)\\)"
       '(1 font-lock-builtin-face)
-      '(2 font-lock-constant-face 'append t))
+      '(2 font-lock-constant-face t t))
      ;; Any text (except ON/OFF) following ECHO is a string.
      (list
       "^[@ \t]*\\([eE][cC][hH][oO]\\)[ \t]+\\(\\([oO]\\([nN]\\|[fF][fF]\\)\\)\\|\\([^>|\r\n]+\\)\\)"
@@ -319,15 +319,8 @@
      ;; case-insensitive
      (generic-make-keywords-list
       (list
-       "call"
-       "echo"
        "for"
        "if"
-       "path"
-       "pause"
-       "prompt"
-       "set"
-       "start"
        )
       'font-lock-keyword-face "^[@ \t]*")
      ;; These keywords can be anywhere on a line
@@ -335,6 +328,7 @@
      ;; case-insensitive
      (generic-make-keywords-list
       (list
+       "do"
        "exist"
        "errorlevel"
        "goto"