Small gud.el patch

[David Hansen]

Hello,

this patch fixes two problems:

1. Wrong coloring of the 'd' in 'end' (syntactic keywords
   gave the 'd' comment end syntax).

2. "end" after a "document" is now colored as a keyword.

David

--- /home/dhansen/cvs-src/emacs/lisp/progmodes/gud.el   2006-07-20 
23:23:10.000000000 +0200
+++ gud.el      2006-08-03 17:18:52.000000000 +0200
@@ -3175,12 +3175,12 @@
     ("\\$\\(\\w+\\)" (1 font-lock-variable-name-face))
     ("^\\s-*\\(\\w\\(\\w\\|\\s_\\)*\\)" (1 font-lock-keyword-face))))
 
-;; FIXME: The keyword "end" associated with "document"
-;; should have font-lock-keyword-face (currently font-lock-doc-face).
+(defun gdb-script-font-lock-end-of-document (limit)
+  (re-search-forward "\\(\n\\)end\\>" limit t))
+
 (defvar gdb-script-font-lock-syntactic-keywords
   '(("^document\\s-.*\\(\n\\)" (1 "< b"))
-    ;; It would be best to change the \n in front, but it's more difficult.
-    ("^en\\(d\\)\\>" (1 "> b"))))
+    (gdb-script-font-lock-end-of-document (1 "> b"))))
 
 (defun gdb-script-font-lock-syntactic-face (state)
   (cond