02/05: emacs: Autoload hooks instead of putting them in 'guix-init'.

[Alex Kost]

alezost pushed a commit to branch master
in repository guix.

commit 19a9c6f47c9161f6596c31625531c83b13f4d4ae
Author: Alex Kost <address@hidden>
Date:   Mon Feb 8 20:18:25 2016 +0300

    emacs: Autoload hooks instead of putting them in 'guix-init'.
    
    * emacs/guix-init.el: Move adding hooks to...
    * emacs/guix-build-log.el: ... here.
    * emacs/guix-devel.el: ... and here.
---
 emacs/guix-build-log.el |    3 +++
 emacs/guix-devel.el     |    3 +++
 emacs/guix-init.el      |    3 ---
 3 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/emacs/guix-build-log.el b/emacs/guix-build-log.el
index e08a88f..f67be16 100644
--- a/emacs/guix-build-log.el
+++ b/emacs/guix-build-log.el
@@ -367,6 +367,9 @@ programmatically using hooks:
   (guix-build-log-mode))
 
 ;;;###autoload
+(add-hook 'shell-mode-hook 'guix-build-log-minor-mode-activate-maybe)
+
+;;;###autoload
 (add-to-list 'auto-mode-alist
              ;; Regexp for log files (usually placed in /var/log/guix/...)
              (cons (rx "/guix/drvs/" (= 2 alnum) "/" (= 30 alnum)
diff --git a/emacs/guix-devel.el b/emacs/guix-devel.el
index 8eb0309..ee8371c 100644
--- a/emacs/guix-devel.el
+++ b/emacs/guix-devel.el
@@ -364,6 +364,9 @@ bindings:
   (when guix-devel-activate-mode
     (guix-devel-mode)))
 
+;;;###autoload
+(add-hook 'scheme-mode-hook 'guix-devel-activate-mode-maybe)
+
 
 (defvar guix-devel-emacs-font-lock-keywords
   (eval-when-compile
diff --git a/emacs/guix-init.el b/emacs/guix-init.el
index 47ced6a..1d7d258 100644
--- a/emacs/guix-init.el
+++ b/emacs/guix-init.el
@@ -1,7 +1,4 @@
 (require 'guix-autoloads)
 (require 'guix-emacs)
 
-(add-hook 'scheme-mode-hook 'guix-devel-activate-mode-maybe)
-(add-hook 'shell-mode-hook 'guix-build-log-minor-mode-activate-maybe)
-
 (provide 'guix-init)