summary refs log tree commit diff
path: root/gnu/packages/mail.scm
diff options
context:
space:
mode:
authorAlex Kost <alezost@gmail.com>2016-05-08 12:27:50 +0300
committerAlex Kost <alezost@gmail.com>2016-05-16 18:01:18 +0300
commit704f2196688e2b257501e47657f728b7b6fa9c6a (patch)
treecabc0d5987116f022d005dad279ee448fc08f85a /gnu/packages/mail.scm
parent789bda83d2f356a55a2c65ff1b4ffe3431fc11b3 (diff)
downloadguix-704f2196688e2b257501e47657f728b7b6fa9c6a.tar.gz
gnu: mu: Install emacs autoloads.
* gnu/packages/mail.scm (mu)[arguments]: Add 'install-emacs-autoloads'
  phase.  Use appropriate modules and imported-modules.
Diffstat (limited to 'gnu/packages/mail.scm')
-rw-r--r--gnu/packages/mail.scm14
1 files changed, 13 insertions, 1 deletions
diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index 526e63829d..76efceacd2 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -365,7 +365,12 @@ repository and Maildir/IMAP as LOCAL repository.")
        ("gmime" ,gmime)
        ("tzdata" ,tzdata)))             ;for mu/test/test-mu-query.c
     (arguments
-     '(#:phases
+     `(#:modules ((guix build gnu-build-system)
+                  (guix build utils)
+                  (guix build emacs-utils))
+       #:imported-modules (,@%gnu-build-system-modules
+                           (guix build emacs-utils))
+       #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'patch-configure.ac
            ;; By default, elisp code goes to "share/emacs/site-lisp/mu4e",
@@ -385,6 +390,13 @@ repository and Maildir/IMAP as LOCAL repository.")
              (setenv "TZDIR"
                      (string-append (assoc-ref inputs "tzdata")
                                     "/share/zoneinfo"))
+             #t))
+         (add-after 'install 'install-emacs-autoloads
+           (lambda* (#:key outputs #:allow-other-keys)
+             (emacs-generate-autoloads
+              "mu4e"
+              (string-append (assoc-ref outputs "out")
+                             "/share/emacs/site-lisp"))
              #t)))))
     (home-page "http://www.djcbsoftware.nl/code/mu/")
     (synopsis "Quickly find emails")