From 2b8c04fb16d6f69657c312d2ca0836e556abca6c Mon Sep 17 00:00:00 2001 From: Rob Browning Date: Fri, 12 Aug 2016 20:21:43 -0500 Subject: Look for guile-procedures.txt in pkglibdir Look for guile-procedures.txt in %guile-build-info's pkglibdir first since the content is not architecture independent. Bug: https://debbugs.gnu.org/22833 Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=816123 --- module/ice-9/documentation.scm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/module/ice-9/documentation.scm b/module/ice-9/documentation.scm index 5698bd653..fe8171689 100644 --- a/module/ice-9/documentation.scm +++ b/module/ice-9/documentation.scm @@ -158,7 +158,10 @@ (map (lambda (vicinity) (in-vicinity vicinity "guile-procedures.txt")) (or (parse-path "GUILE_DOCSTRINGS_PATH") - (list (%library-dir) (%package-data-dir) (%site-dir))))) + (list + (string-append (cdr (assq 'pkglibdir %guile-build-info)) + "/" (effective-version)) + (%library-dir) (%package-data-dir) (%site-dir))))) (define entry-delimiter "\f")