~ruther/guix-local: profiles: Handle packages without a 'share/info' directory.

c2815c0f46d16b98559d0498ae683b0e36e25e7a — Ludovic Courtès 11 years ago 6b3342a

profiles: Handle packages without a 'share/info' directory.

Reported by Mark H. Weaver.

* guix/profiles.scm (info-dir-file): Handle the case where 'scandir'
  returns #f.

patch browse .tar.gz

1 files changed, 1 insertions(+), 1 deletions(-)

M guix/profiles.scm

M guix/profiles.scm => guix/profiles.scm +1 -1

@@ 393,7 393,7 @@ MANIFEST."
         (define (info-files top)
           (let ((infodir (string-append top "/share/info")))
             (map (cut string-append infodir "/" <>)
-                 (scandir infodir info-file?))))
+                 (or (scandir infodir info-file?) '()))))
 
         (define (install-info info)
           (zero?