summaryrefslogtreecommitdiff
path: root/geiser-guile.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-10-23 22:43:09 +0100
committerjao <jao@gnu.org>2022-10-23 22:43:09 +0100
commitea8668dbe7ded2d2d7a31cdf5ee52c3088f0cfc1 (patch)
tree459f355bbde74c899728a0240907d615f8167ce6 /geiser-guile.el
parenta2ef4dbd7d63896f012896d497b17d8162f82178 (diff)
downloadgeiser-guile-ea8668dbe7ded2d2d7a31cdf5ee52c3088f0cfc1.tar.gz
geiser-guile-ea8668dbe7ded2d2d7a31cdf5ee52c3088f0cfc1.tar.bz2
debug transient tweaks
Diffstat (limited to 'geiser-guile.el')
-rw-r--r--geiser-guile.el11
1 files changed, 7 insertions, 4 deletions
diff --git a/geiser-guile.el b/geiser-guile.el
index 339075a..8d09c5b 100644
--- a/geiser-guile.el
+++ b/geiser-guile.el
@@ -436,11 +436,14 @@ This function uses `geiser-guile-init-file' if it exists."
(transient-define-prefix geiser-guile--debug-transient ()
"Debugging meta-commands."
["Guile debugger"
+ [("n" "Next error" compilation-next-error)
+ ("p" "Previous error" compilation-next-error)
+ ("z" "Scheme buffer" geiser-debug-switch-to-buffer)
+ ("x" "Exit debug level" geiser-guile-debug-quit)]
[("b" "Show backtrace" geiser-guile-debug-show-backtrace)
- ("e" "Show error" geiser-guile-debug-show-error)]
- [("l" "Show locals" geiser-guile-debug-show-locals)
- ("r" "Show registers" geiser-guile-debug-show-registers)]
- [("x" "Exit debug level" geiser-guile-debug-quit)]])
+ ("e" "Show error" geiser-guile-debug-show-error)
+ ("l" "Show locals" geiser-guile-debug-show-locals)
+ ("r" "Show registers" geiser-guile-debug-show-registers)]])
(defun geiser-guile-debug-menu ()
"Show available debugging commands, if any."