02/07: doc: Build an empty index if the manual is missing.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit b38e053513323fef52e57496ef2d7ed3f92d772e
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri Apr 8 23:58:24 2022 +0200

    doc: Build an empty index if the manual is missing.
    
    That way, the "sk" index for 'guix-manual' is empty, because
    'guix-manual' lacks an "sk" translation.
    
    * doc/build.scm (html-manual-identifier-index)[build](html-files):
    Gracefully handle 'scandir' returning #f.
---
 doc/build.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/doc/build.scm b/doc/build.scm
index f5c8713b41..cf3e5d2830 100644
--- a/doc/build.scm
+++ b/doc/build.scm
@@ -309,8 +309,9 @@ actual file name."
             (define (html-files directory)
               ;; Return the list of HTML files under DIRECTORY.
               (map (cut string-append directory "/" <>)
-                   (scandir #$manual (lambda (file)
-                                       (string-suffix? ".html" file)))))
+                   (or (scandir #$manual (lambda (file)
+                                           (string-suffix? ".html" file)))
+                       '())))
 
             (define anchors
               (sort (concatenate