Mercurial > emacs
changeset 52058:5d60b6e20fbd
(gdb-script-font-lock-keywords): Put `font-lock-function-name-face'
on a symbol which includes `-' like `hook-run'. Put
font-lock-variable-name-face on a symbol starting with $.
| author | Masatake YAMATO <jet@gyve.org> |
|---|---|
| date | Mon, 28 Jul 2003 06:27:09 +0000 |
| parents | e9ebec7774ab |
| children | 4b5692f6703a |
| files | lisp/ChangeLog lisp/progmodes/gud.el |
| diffstat | 2 files changed, 9 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sun Jul 27 19:54:09 2003 +0000 +++ b/lisp/ChangeLog Mon Jul 28 06:27:09 2003 +0000 @@ -1,3 +1,10 @@ +2003-07-23 Masatake YAMATO <jet@gyve.org> + + * 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-variable-name-face + on a symbol starting with $. + 2003-07-27 Markus Rost <rost@math.ohio-state.edu> * files.el (set-visited-file-name): Use truename for buffer-file-name.
--- a/lisp/progmodes/gud.el Sun Jul 27 19:54:09 2003 +0000 +++ b/lisp/progmodes/gud.el Mon Jul 28 06:27:09 2003 +0000 @@ -2892,7 +2892,8 @@ st)) (defvar gdb-script-font-lock-keywords - '(("^define\\s-+\\(\\w+\\)" (1 font-lock-function-name-face)) + '(("^define\\s-+\\(\\(\\w\\|\\s_\\)+\\)" (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