Changeset 4091 for trunk/lisp/progmodes/gud.el
- Timestamp:
- 05/27/06 10:35:24 (2 years ago)
- Files:
-
- trunk/lisp/progmodes/gud.el (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/lisp/progmodes/gud.el
r4085 r4091 2694 2694 ;; Stop displaying an arrow in a source file. 2695 2695 (setq gud-overlay-arrow-position nil) 2696 ( with-current-buffer gud-comint-buffer2697 (if (memq gud-minor-mode-type '(gdbmi gdba))2698 (gdb-reset)2699 (gud-reset)))2696 (if (memq (buffer-local-value 'gud-minor-mode gud-comint-buffer) 2697 '(gdba gdbmi)) 2698 (gdb-reset) 2699 (gud-reset)) 2700 2700 (let* ((obuf (current-buffer))) 2701 2701 ;; save-excursion isn't the right thing if … … 3167 3167 '(("^define\\s-+\\(\\(\\w\\|\\s_\\)+\\)" (1 font-lock-function-name-face)) 3168 3168 ("\\$\\(\\w+\\)" (1 font-lock-variable-name-face)) 3169 ("^\\s-*\\(\\ (\\w\\|\\s_\\)+\\)" (1 font-lock-keyword-face))))3169 ("^\\s-*\\(\\w\\(\\w\\|\\s_\\)*\\)" (1 font-lock-keyword-face)))) 3170 3170 3171 3171 ;; FIXME: The keyword "end" associated with "document"
