From 18644e050cb9dd934a1ba6718a4b01d2747a71a0 Mon Sep 17 00:00:00 2001 From: condy Date: Sat, 14 Nov 2020 20:54:48 +0800 Subject: [PATCH] guix: revamped via read-only bindings --- modes/guix/evil-collection-guix.el | 18 ++++-------------- 1 file changed, 4 insertions(+), 14 deletions(-) diff --git a/modes/guix/evil-collection-guix.el b/modes/guix/evil-collection-guix.el index f364406..b4f7a87 100644 --- a/modes/guix/evil-collection-guix.el +++ b/modes/guix/evil-collection-guix.el @@ -47,7 +47,7 @@ (defmacro evil-collection-guix-set (map) "Set common bindings in MAP." `(progn - (evil-collection-inhibit-insert-state ',map) + (evil-collection-set-readonly-bindings ',map) (evil-collection-define-key 'normal ',map ;; motion (kbd "SPC") 'scroll-up-command @@ -78,12 +78,7 @@ "gR" 'bui-redisplay ;; repl - "gz" 'guix-switch-to-repl - - ;; quit - "q" 'quit-window - "ZQ" 'evil-quit - "ZZ" 'quit-window))) + "gz" 'guix-switch-to-repl))) ;;;###autoload (defun evil-collection-guix-setup () @@ -187,7 +182,7 @@ (evil-collection-guix-set guix-hydra-build-info-mode-map) - (evil-collection-inhibit-insert-state 'guix-build-log-mode-map) + (evil-collection-set-readonly-bindings 'guix-build-log-mode-map) (evil-collection-define-key 'normal 'guix-build-log-mode-map ;; motion (kbd "SPC") 'scroll-up-command @@ -205,12 +200,7 @@ "gr" 'revert-buffer ;; repl - "gz" 'guix-switch-to-repl ; TODO: Does it still make sense here? - - ;; quit - "q" 'quit-window - "ZQ" 'evil-quit - "ZZ" 'quit-window) + "gz" 'guix-switch-to-repl) (evil-collection-guix-set guix-service-list-mode-map) (evil-collection-define-key 'normal 'guix-service-list-mode-map