gnu: notmuch: Move elisp directory and generate autoloads.

* gnu/packages/mail.scm (notmuch)[arguments]: Move elisp files to
share/emacs/site-lisp/guix.d/notmuch-<version>.
Add make-autoloads phase.
This commit is contained in:
Arun Isaac 2017-12-11 19:34:01 +05:30
parent cc6a4b0386
commit d738f134e4
No known key found for this signature in database
GPG Key ID: 2E25EE8B61802BB3
1 changed files with 20 additions and 5 deletions

View File

@ -703,7 +703,13 @@ invoking @command{notifymuch} from the post-new hook.")
"1fyx20rjpwbf2j1v5fpa5s0rjnwhcgvijzh2qyinp8rlbh1qxmab")))) "1fyx20rjpwbf2j1v5fpa5s0rjnwhcgvijzh2qyinp8rlbh1qxmab"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:make-flags (list "V=1") ; Verbose test output. `(#:modules ((guix build gnu-build-system)
((guix build emacs-build-system) #:prefix emacs:)
(guix build utils))
#:imported-modules (,@%gnu-build-system-modules
(guix build emacs-build-system)
(guix build emacs-utils))
#:make-flags (list "V=1") ; Verbose test output.
#:phases (modify-phases %standard-phases #:phases (modify-phases %standard-phases
(add-after 'unpack 'patch-notmuch-lib.el (add-after 'unpack 'patch-notmuch-lib.el
(lambda _ (lambda _
@ -715,16 +721,25 @@ invoking @command{notifymuch} from the post-new hook.")
(setenv "CC" "gcc") (setenv "CC" "gcc")
(setenv "CONFIG_SHELL" (which "sh")) (setenv "CONFIG_SHELL" (which "sh"))
(let ((out (assoc-ref outputs "out"))) (let* ((out (assoc-ref outputs "out"))
(zero? (system* "./configure" (elisp
(string-append "--prefix=" out)))))) (string-append out "/share/emacs/site-lisp/guix.d/"
,name "-" ,version)))
(zero?
(system*
"./configure"
(string-append "--prefix=" out)
(string-append "--emacslispdir=" elisp)
(string-append "--emacsetcdir=" elisp))))))
(add-before 'check 'prepare-test-environment (add-before 'check 'prepare-test-environment
(lambda _ (lambda _
(setenv "TEST_CC" "gcc") (setenv "TEST_CC" "gcc")
;; Patch various inline shell invocations. ;; Patch various inline shell invocations.
(substitute* (find-files "test" "\\.sh$") (substitute* (find-files "test" "\\.sh$")
(("/bin/sh") (which "sh"))) (("/bin/sh") (which "sh")))
#t))))) #t))
(add-after 'install 'make-autoloads
(assoc-ref emacs:%standard-phases 'make-autoloads)))))
(native-inputs (native-inputs
`(("bash-completion" ,bash-completion) `(("bash-completion" ,bash-completion)
("emacs" ,emacs-no-x) ; Minimal lacks libxml, needed for some tests. ("emacs" ,emacs-no-x) ; Minimal lacks libxml, needed for some tests.