build: emacs: Search for elisp in "share/emacs/site-lisp".
* guix/build/emacs-build-system.scm (emacs-inputs-el-directories): Add ".../share/emacs/site-lisp" directory to the returned result as elisp files can also be placed there.master
parent
b3470031df
commit
2831675bfd
|
@ -1,5 +1,7 @@
|
||||||
;;; GNU Guix --- Functional package management for GNU
|
;;; GNU Guix --- Functional package management for GNU
|
||||||
;;; Copyright © 2015 Federico Beffa <beffa@fbengineering.ch>
|
;;; Copyright © 2015 Federico Beffa <beffa@fbengineering.ch>
|
||||||
|
;;; Copyright © 2016 David Thompson <davet@gnu.org>
|
||||||
|
;;; Copyright © 2016 Alex Kost <alezost@gmail.com>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -152,10 +154,11 @@ store in '.el' files."
|
||||||
(define (emacs-inputs-el-directories dirs)
|
(define (emacs-inputs-el-directories dirs)
|
||||||
"Build the list of Emacs Lisp directories from the Emacs package directory
|
"Build the list of Emacs Lisp directories from the Emacs package directory
|
||||||
DIRS."
|
DIRS."
|
||||||
(map (lambda (d)
|
(append-map (lambda (d)
|
||||||
(string-append d %install-suffix "/"
|
(list (string-append d "/share/emacs/site-lisp")
|
||||||
(store-directory->elpa-name-version d)))
|
(string-append d %install-suffix "/"
|
||||||
dirs))
|
(store-directory->elpa-name-version d))))
|
||||||
|
dirs))
|
||||||
|
|
||||||
(define (package-name-version->elpa-name-version name-ver)
|
(define (package-name-version->elpa-name-version name-ver)
|
||||||
"Convert the Guix package NAME-VER to the corresponding ELPA name-version
|
"Convert the Guix package NAME-VER to the corresponding ELPA name-version
|
||||||
|
|
Reference in New Issue