From c42e6c6c2f7163396cec977f60bcc3d02d87bd3c Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Thu, 29 Oct 2015 21:05:17 +0300 Subject: [PATCH] emacs: Disable minor modes in 'guix-build-log-mode'. * emacs/guix-build-log.el (guix-build-log-mode-hook): Remove 'compilation-shell-minor-mode' as it is slow on big buffers, and 'view-mode' as it rebinds too many keys. (guix-build-log-mode-map): Add "c" and "v" key bindings for the removed minor modes. --- emacs/guix-build-log.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/emacs/guix-build-log.el b/emacs/guix-build-log.el index e28dce4471..c209100ffd 100644 --- a/emacs/guix-build-log.el +++ b/emacs/guix-build-log.el @@ -102,10 +102,7 @@ "Face for the number of seconds for a phase." :group 'guix-build-log-faces) -(defcustom guix-build-log-mode-hook - ;; Not using `compilation-minor-mode' because it rebinds some standard - ;; keys, including M-n/M-p. - '(compilation-shell-minor-mode view-mode) +(defcustom guix-build-log-mode-hook '() "Hook run after `guix-build-log-mode' is entered." :type 'hook :group 'guix-build-log) @@ -196,6 +193,8 @@ For `guix-build-log-minor-mode' this map is prefixed with 'C-c'.") (set-keymap-parent map (make-composed-keymap (list guix-build-log-common-map) special-mode-map)) + (define-key map (kbd "c") 'compilation-shell-minor-mode) + (define-key map (kbd "v") 'view-mode) map) "Keymap for `guix-build-log-mode' buffers.")