summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2017-09-03 19:39:11 +0100
committerChristopher Baines <mail@cbaines.net>2017-09-03 19:39:11 +0100
commit43637673944226412a27967c235046546d7771ed (patch)
treeb2c16cdf1020b777b09214534699d7b8c5cce1f7
parent5804c7b616a39c05280aaabf3cec753db5fc6002 (diff)
downloadpatches-43637673944226412a27967c235046546d7771ed.tar
patches-43637673944226412a27967c235046546d7771ed.tar.gz
build: Fix helpful output for emacs-build-system install phase.
Detecting when no files were installed was broken when switching to use cond. Test with (not (null? ...)) to fix this. * guix/build/emacs-build-system.scm (install): Fix detecting when no files were installed.
-rw-r--r--guix/build/emacs-build-system.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/build/emacs-build-system.scm b/guix/build/emacs-build-system.scm
index 202ce5392d..2404dbddb4 100644
--- a/guix/build/emacs-build-system.scm
+++ b/guix/build/emacs-build-system.scm
@@ -131,7 +131,7 @@ store in '.el' files."
(target-directory (string-append out %install-suffix "/" elpa-name-ver))
(files-to-install (find-files source install-file?)))
(cond
- (files-to-install
+ ((not (null? files-to-install))
(for-each
(lambda (file)
(let* ((stripped-file (string-drop file (string-length source)))