[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Small gud.el patch
From: |
David Hansen |
Subject: |
Small gud.el patch |
Date: |
Thu, 03 Aug 2006 17:23:33 +0200 |
User-agent: |
Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.50 (gnu/linux) |
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
- Small gud.el patch,
David Hansen <=