~ruther/guix-local: emacs: Disable minor modes in 'guix-build-log-mode'.

c42e6c6c2f7163396cec977f60bcc3d02d87bd3c — Alex Kost 10 years ago 20ce2fe

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.

patch browse .tar.gz

1 files changed, 3 insertions(+), 4 deletions(-)

M emacs/guix-build-log.el

M emacs/guix-build-log.el => emacs/guix-build-log.el +3 -4

@@ 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.")