branch: master
commit d3953ae55b0955807eecf3994e9da9b8f343728f
Author: rocky <[email protected]>
Commit: rocky <[email protected]>
Fix bug in picking out short-key variable name introduced by recent changes
---
realgud/common/shortkey.el | 9 +++++----
1 file changed, 5 insertions(+), 4 deletions(-)
diff --git a/realgud/common/shortkey.el b/realgud/common/shortkey.el
index 74e86be..4adecc2 100644
--- a/realgud/common/shortkey.el
+++ b/realgud/common/shortkey.el
@@ -83,14 +83,15 @@ The buffer is read-only when the minor mode is active.
(when (realgud-cmdbuf? cmdbuf)
(with-current-buffer cmdbuf
(let* ((info realgud-cmdbuf-info)
- (debugger-name
- (realgud:debugger-name-transform
- (realgud-cmdbuf-info-debugger-name info)))
+ (debugger-name (realgud-cmdbuf-info-debugger-name info))
+ (base-variable-name
+ (or (gethash debugger-name realgud:variable-basename-hash)
+ debugger-name))
(keymap-symbol
(intern
(replace-regexp-in-string
"\\." ""
- (concat debugger-name "-short-key-mode-map"))))
+ (concat base-variable-name "-short-key-mode-map"))))
(keymap (eval keymap-symbol))
)
(cond ((keymapp keymap) keymap)
