01/01: build: Fix helpful output for emacs-build-system install phase.

[Christopher Baines]

cbaines pushed a commit to branch master
in repository guix.

commit 43637673944226412a27967c235046546d7771ed
Author: Christopher Baines <address@hidden>
Date:   Sun Sep 3 19:39:11 2017 +0100

    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.
---
 guix/build/emacs-build-system.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/build/emacs-build-system.scm 
b/guix/build/emacs-build-system.scm
index 202ce53..2404dbd 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)))