From e4e4afbb885e65e62586878d82b5e90273b8f742 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Mon, 16 Dec 2019 07:56:53 +0100 Subject: Set EMACSLOADPATH. This is necessary to adjust to changes in Guix's guix-emacs.el. --- guix/rekado/guile-studio.scm | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) (limited to 'guix/rekado') diff --git a/guix/rekado/guile-studio.scm b/guix/rekado/guile-studio.scm index 79e6d8b..28b1b07 100644 --- a/guix/rekado/guile-studio.scm +++ b/guix/rekado/guile-studio.scm @@ -18,7 +18,11 @@ (source (local-file (string-append "../../guile-studio-" version ".tar.gz"))) (build-system gnu-build-system) (arguments - `(#:tests? #f ; there are none + `(#:modules + ((ice-9 match) + (srfi srfi-1) + ,@%gnu-build-system-modules) + #:tests? #f ; there are none #:make-flags (list (string-append "ICONS_DIR=" (assoc-ref %build-inputs "adwaita-icon-theme") @@ -29,7 +33,13 @@ (assoc-ref %build-inputs "emacs")) (string-append "GUILE_DIR=" (assoc-ref %build-inputs "guile")) - (string-join (cons "INPUTS=" (map cdr %build-inputs))) + (string-join (cons "INPUTS=" + (filter-map + (lambda (input) + (match input + ((label . pkg) + (and (string-prefix? "emacs" label) pkg)))) + %build-inputs))) (string-append "PREFIX=" (assoc-ref %outputs "out"))) #:phases (modify-phases %standard-phases -- cgit v1.2.3