aboutsummaryrefslogtreecommitdiff
path: root/guix/man-db.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix/man-db.scm')
-rw-r--r--guix/man-db.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/man-db.scm b/guix/man-db.scm
index 5d62e0c82d..732aef1083 100644
--- a/guix/man-db.scm
+++ b/guix/man-db.scm
@@ -187,7 +187,8 @@
(define (man-files directory)
"Return the list of man pages found under DIRECTORY, recursively."
- (find-files directory "\\.[0-9][a-z]?(\\.gz)?$"))
+ ;; Filter the list to ensure that broken symlinks are excluded.
+ (filter file-exists? (find-files directory "\\.[0-9][a-z]?(\\.gz)?$")))
(define (mandb-entries directory)
"Return mandb entries for the man pages found under DIRECTORY, recursively."