# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 807338628 0
# Node ID d9dc148cd8ac1e47764f9f21a0ba7702c4c37706
# Parent  fc5662a15b3d900625f69f9d70a01ad6cb26906a
(gud-xdb-marker-filter): Change pattern to accept spc at end.

diff -r fc5662a15b3d -r d9dc148cd8ac lisp/gud.el
--- a/lisp/gud.el	Tue Aug 01 23:53:30 1995 +0000
+++ b/lisp/gud.el	Wed Aug 02 04:43:48 1995 +0000
@@ -808,10 +808,11 @@
               gud-marker-acc "")
       (setq gud-marker-acc (concat gud-marker-acc string)))
     (if result
-        (if (or (string-match "\\([^\n \t:]+\\): [^:]+: \\([0-9]+\\):" result)
+        (if (or (string-match "\\([^\n \t:]+\\): [^:]+: \\([0-9]+\\)[: ]"
+			      result)
                 (string-match "[^: \t]+:[ \t]+\\([^:]+\\): [^:]+: \\([0-9]+\\):"
                               result))
-            (let ((line (string-to-int 
+            (let ((line (string-to-int
                          (substring result (match-beginning 2) (match-end 2))))
                   (file (gud-xdb-file-name
                          (substring result (match-beginning 1) (match-end 1)))))