aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorNick Roberts2008-02-29 00:47:13 +0000
committerNick Roberts2008-02-29 00:47:13 +0000
commit707ae1522529494013bfac2fc4e34b229d7c0f88 (patch)
tree2dca962da6454edf26c5f33029917eb2f850b23a
parentb25c4e28936d86d3b369f308a0d22ec71b1ac8e2 (diff)
downloademacs-707ae1522529494013bfac2fc4e34b229d7c0f88.tar.gz
emacs-707ae1522529494013bfac2fc4e34b229d7c0f88.zip
(gdb-info-stack-custom): Apply
function-name-face correctly when user has "set print address off".
-rw-r--r--lisp/progmodes/gdb-ui.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el
index b701b472ce9..111f8903fd3 100644
--- a/lisp/progmodes/gdb-ui.el
+++ b/lisp/progmodes/gdb-ui.el
@@ -2202,10 +2202,7 @@ static char *magick[] = {
2202 (put-text-property bl (+ bl 4) 2202 (put-text-property bl (+ bl 4)
2203 'face '(:inverse-video t)) 2203 'face '(:inverse-video t))
2204 (setq move-to bl))) 2204 (setq move-to bl)))
2205 (when (re-search-forward 2205 (when (re-search-forward "\\([^ ]+\\) (" el t)
2206 (concat
2207 (if (string-equal (match-string 1) "0") "" " in ")
2208 "\\([^ ]+\\) (") el t)
2209 (put-text-property (match-beginning 1) (match-end 1) 2206 (put-text-property (match-beginning 1) (match-end 1)
2210 'face font-lock-function-name-face) 2207 'face font-lock-function-name-face)
2211 (setq bl (match-end 0)) 2208 (setq bl (match-end 0))