[elpa] externals/realgud f4c4ccd 118/140: Fix improper breakpoint file-callback function parameters

[Rocky Bernstein]

branch: externals/realgud
commit f4c4ccd95d85051807634d1649ef37f22b3dda69
Author: rocky <address@hidden>
Commit: rocky <address@hidden>

    Fix improper breakpoint file-callback function parameters
---
 realgud/common/track.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/realgud/common/track.el b/realgud/common/track.el
index 0250700..f158d84 100644
--- a/realgud/common/track.el
+++ b/realgud/common/track.el
@@ -535,11 +535,14 @@ Otherwise return nil. CMD-MARK is set in the realgud-loc 
object created.
                             (line-str (match-string line-group text))
                             (source-str (and text-group (match-string 
text-group text)))
                             (lineno (string-to-number (or line-str "1")))
+                            (directory
+                             (cond ((boundp 'starting-directory) 
starting-directory)
+                                   (t nil)))
                             )
                        (cond (callback-loc-fn
                               (setq found-func (funcall callback-loc-fn text
                                                         filename lineno 
source-str
-                                                        ignore-re-file-list 
cmd-mark))
+                                                        cmd-mark directory))
                               (setq loc-pat-list nil))
 
                              ('t