font lock in gdb-script mode

[Masatake YAMATO]

I've modified font lock related code in gdb-script-mode a bit.
Please, review my small patch.

2003-07-23  Masatake YAMATO  <address@hidden>

        * progmodes/gud.el (gdb-script-font-lock-keywords): 
        Put `font-lock-function-name-face' on a symbol which includes
        `-' like `hook-run'. Put `font-lock-function-name-face' on
        a symbol after `document'. Put font-lock-variable-name-face 
        on a symbol starting with $.


Index: lisp/progmodes/gud.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/gud.el,v
retrieving revision 1.3
diff -u -r1.3 gud.el
--- lisp/progmodes/gud.el       18 Jun 2003 23:26:28 -0000      1.3
+++ lisp/progmodes/gud.el       23 Jul 2003 13:10:51 -0000
@@ -2892,7 +2892,9 @@
     st))
 
 (defvar gdb-script-font-lock-keywords
-  '(("^define\\s-+\\(\\w+\\)" (1 font-lock-function-name-face))
+  '(("^define\\s-+\\(\\(\\w\\|-\\)+\\)" (1 font-lock-function-name-face))
+    ("^document\\s-+\\(\\(\\w\\|-\\)+\\)" (1 font-lock-function-name-face))
+    ("$\\(\\w+\\)" (1 font-lock-variable-name-face))
     ("^\\s-*\\([a-z]+\\)" (1 font-lock-keyword-face))))
 
 (defvar gdb-script-font-lock-syntactic-keywords