branch: master
commit c0c072f2574bf1aa7e4959ebd27ea82ec6446405
Author: rocky <[email protected]>
Commit: rocky <[email protected]>
And a couple more
---
realgud/debugger/trepan.pl/core.el | 4 ++--
realgud/debugger/zshdb/core.el | 2 +-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/realgud/debugger/trepan.pl/core.el
b/realgud/debugger/trepan.pl/core.el
index 37ea9a8..1489324 100644
--- a/realgud/debugger/trepan.pl/core.el
+++ b/realgud/debugger/trepan.pl/core.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2011-2012, 2014, 2016 Free Software Foundation, Inc
+;; Copyright (C) 2011-2012, 2014, 2016-2017 Free Software Foundation, Inc
;; Author: Rocky Bernstein <[email protected]>
@@ -150,7 +150,7 @@ Note that the script name path has been expanded via
`expand-file-name'.
(defun realgud:trepanpl-suggest-invocation (debugger-name)
"Suggest a trepanpl command invocation via `realgud-suggest-invocaton'"
- (realgud-suggest-invocation realgud:trepanpl-command-name
+ (realgud-suggest-invocation (or debugger realgud:trepanpl-command-name)
realgud:trepanpl-minibuffer-history
"perl" "\\.pl$" "trepan.pl"))
diff --git a/realgud/debugger/zshdb/core.el b/realgud/debugger/zshdb/core.el
index 2eefad1..912c0ed 100644
--- a/realgud/debugger/zshdb/core.el
+++ b/realgud/debugger/zshdb/core.el
@@ -151,7 +151,7 @@ Note that path elements have been expanded via
`realgud:expand-file-name-if-exis
(defun zshdb-suggest-invocation (debugger-name)
"Suggest a zshdb command invocation via `realgud-suggest-invocaton'"
- (realgud-suggest-invocation realgud:zshdb-command-name
+ (realgud-suggest-invocation (or debugger-name realgud:zshdb-command-name)
realgud:zshdb-minibuffer-history
"sh" "\\.\\(?:z\\)?sh$"))
