diff options
| -rw-r--r-- | lisp/progmodes/gud.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index fadeae2e26c..7c1970f7aa2 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -889,7 +889,7 @@ It is passed through FILTER before we look at it." | |||
| 889 | (string-match "^#\\([0-9]+\\) +[0-9a-fx]+ in \\([:0-9a-zA-Z_]+\\) (" e) | 889 | (string-match "^#\\([0-9]+\\) +[0-9a-fx]+ in \\([:0-9a-zA-Z_]+\\) (" e) |
| 890 | (string-match "^#\\([0-9]+\\) +\\([:0-9a-zA-Z_]+\\) (" e))) | 890 | (string-match "^#\\([0-9]+\\) +\\([:0-9a-zA-Z_]+\\) (" e))) |
| 891 | (if (not (string-match | 891 | (if (not (string-match |
| 892 | "at \\([-0-9a-zA-Z_.]+\\):\\([0-9]+\\)$" e)) | 892 | "at \\([-0-9a-zA-Z_/.]+\\):\\([0-9]+\\)$" e)) |
| 893 | nil | 893 | nil |
| 894 | (setcar newlst | 894 | (setcar newlst |
| 895 | (list (nth 0 (car newlst)) | 895 | (list (nth 0 (car newlst)) |
| @@ -901,7 +901,7 @@ It is passed through FILTER before we look at it." | |||
| 901 | (setq newlst | 901 | (setq newlst |
| 902 | (cons | 902 | (cons |
| 903 | (if (string-match | 903 | (if (string-match |
| 904 | "at \\([-0-9a-zA-Z_.]+\\):\\([0-9]+\\)$" e) | 904 | "at \\([-0-9a-zA-Z_/.]+\\):\\([0-9]+\\)$" e) |
| 905 | (list name num (match-string 1 e) | 905 | (list name num (match-string 1 e) |
| 906 | (match-string 2 e)) | 906 | (match-string 2 e)) |
| 907 | (list name num)) | 907 | (list name num)) |