04/04: emacs: Disable minor modes in 'guix-build-log-mode'.

[Alex Kost]

alezost pushed a commit to branch master
in repository guix.

commit c42e6c6c2f7163396cec977f60bcc3d02d87bd3c
Author: Alex Kost <address@hidden>
Date:   Thu Oct 29 21:05:17 2015 +0300

    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 files changed, 3 insertions(+), 4 deletions(-)

diff --git a/emacs/guix-build-log.el b/emacs/guix-build-log.el
index e28dce4..c209100 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.")