mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 11:50:51 -08:00
Code Issues Projects Releases Wiki Activity

Merge from emacs--rel--22

Browse source 
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1139
This commit is contained in:
Miles Bader 2008-05-02 12:43:30 +00:00
commit bfab7c6ec7
2 changed files with 9 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/progmodes/gdb-ui.el
View file

@ -1950,12 +1950,13 @@ static char *magick[] = {
(add-text-properties
(match-beginning 1) (match-end 1)
'(face font-lock-function-name-face)))
(if (re-search-forward ".*\\s-+\\(\\S-+\\):\\([0-9]+\\)$")
(if (re-search-forward
".*\\s-+\\(\\S-+\\):\\([0-9]+\\)$" nil t)
(let ((line (match-string 2))
(file (match-string 1)))
(add-text-properties bl el
'(mouse-face highlight
help-echo "mouse-2, RET: visit breakpoint"))
'(mouse-face highlight
help-echo "mouse-2, RET: visit breakpoint"))
(unless (file-exists-p file)
(setq file (cdr (assoc bptno gdb-location-alist))))
(if (and file