diff options
| author | Daniel Pettersson <daniel@dpettersson.net> | 2025-07-31 21:37:03 +0200 |
|---|---|---|
| committer | Youmu <condy0919@gmail.com> | 2025-08-03 09:24:55 +0800 |
| commit | 3feaee8e2907703f1254910ce1937b2b4f1059d9 (patch) | |
| tree | 4b0671b7504966c33a78247763a7e8d0429a60fe | |
| parent | d74647169703362433b1f55420623f145880b898 (diff) | |
dape: Add override bindings to all info modes
| -rw-r--r-- | modes/dape/evil-collection-dape.el | 29 |
1 files changed, 23 insertions, 6 deletions
diff --git a/modes/dape/evil-collection-dape.el b/modes/dape/evil-collection-dape.el index 6064c10..9f4f5a9 100644 --- a/modes/dape/evil-collection-dape.el +++ b/modes/dape/evil-collection-dape.el @@ -5,7 +5,7 @@ ;; Author: Daniel Pettersson <daniel@dpettersson.net> ;; Maintainer: Daniel Pettersson <daniel@dpettersson.net> ;; URL: https://github.com/emacs-evil/evil-collection -;; Version: 0.0.1 +;; Version: 0.0.2 ;; Package-Requires: ((emacs "26.3")) ;; Keywords: evil, emacs, tools, dape @@ -31,16 +31,29 @@ (defvar dape-info-scope-mode-map) (defvar dape-info-watch-mode-map) +(defvar dape-info-stack-mode-map) +(defvar dape-info-sources-mode-map) +(defvar dape-info-modules-mode-map) +(defvar dape-info-breakpoints-mode-map) +(defvar dape-info-threads-mode-map) -(defconst evil-collection-dape-maps '(dape-info-watch-edit-mode-map - dape-info-scope-mode-map - dape-info-watch-mode-map)) +(defconst evil-collection-dape--info-mode-maps '(dape-info-scope-mode-map + dape-info-watch-mode-map + dape-info-stack-mode-map + dape-info-sources-mode-map + dape-info-modules-mode-map + dape-info-breakpoints-mode-map + dape-info-threads-mode-map)) + +(defconst evil-collection-dape-maps `(dape-info-watch-edit-mode-map + dape-memory-mode-map + . ,evil-collection-dape--info-mode-maps)) ;;;###autoload (defun evil-collection-dape-setup () "Set up `evil' bindings for `dape'." - (evil-make-overriding-map dape-info-scope-mode-map) - (evil-make-overriding-map dape-info-watch-mode-map) + (dolist (map-symbol evil-collection-dape--info-mode-maps) + (evil-make-overriding-map (symbol-value map-symbol))) (evil-collection-define-key 'normal 'dape-info-watch-mode-map "i" 'dape-info-watch-edit-mode) @@ -48,6 +61,10 @@ (evil-collection-define-key nil 'dape-info-watch-edit-mode-map [remap evil-write] 'dape-info-watch-finish-edit) + (evil-collection-define-key 'normal 'dape-memory-mode-map + [remap evil-write] 'save-buffer + "ZZ" 'save-buffer) + (evil-collection-define-key 'normal 'dape-info-watch-edit-mode-map "ZQ" 'dape-info-watch-abort-changes "ZZ" 'dape-info-watch-finish-edit |