emacs/evil-collection
1
0
Fork 0
mirror of https://github.com/jojojames/evil-collection.git synced 2024-06-20 06:46:37 +02:00
Code Issues Releases Wiki Activity

sly: Add bindings for trace dialog.

Browse Source
This commit is contained in:
Pierre Neidhardt 2019-10-13 20:32:59 +02:00
parent 96a7e7dce7
commit 0f1394ceb0
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
modes/sly/evil-collection-sly.el
View File

@ -37,6 +37,7 @@
(defvar sly-mode-map)
(defvar sly-popup-buffer-mode-map)
(defvar sly-thread-control-mode-map)
(defvar sly-trace-dialog-mode-map)
(defvar sly-xref-mode-map)
(defconst evil-collection-sly-maps '(sly-db-mode-map
@ -44,6 +45,7 @@
sly-mode-map
sly-popup-buffer-mode-map
sly-thread-control-mode-map
sly-trace-dialog-mode-map
sly-xref-mode-map))
;; Same as `evil-collection-slime-last-sexp'.
@ -191,6 +193,11 @@
(kbd "C-p") 'sly-mrepl-previous-input-or-button
(kbd "C-n") 'sly-mrepl-next-input-or-button)
(evil-collection-define-key 'normal 'sly-trace-dialog-mode-map
"q" 'quit-window
"gr" 'sly-trace-dialog-fetch-status
"gR" 'sly-trace-dialog-fetch-traces)
(add-hook 'sly-popup-buffer-mode-hook #'evil-normalize-keymaps))
(provide 'evil-collection-sly)