diff options
| -rw-r--r-- | doc/build.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/doc/build.scm b/doc/build.scm index 6326736451a..a227a482744 100644 --- a/doc/build.scm +++ b/doc/build.scm | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | ;;; GNU Guix --- Functional package management for GNU | 1 | ;;; GNU Guix --- Functional package management for GNU |
| 2 | ;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org> | 2 | ;;; Copyright © 2019, 2020 Ludovic Courtès <ludo@gnu.org> |
| 3 | ;;; | 3 | ;;; |
| 4 | ;;; This file is part of GNU Guix. | 4 | ;;; This file is part of GNU Guix. |
| 5 | ;;; | 5 | ;;; |
| @@ -203,6 +203,11 @@ makeinfo OPTIONS." | |||
| 203 | (setvbuf (current-output-port) 'line) | 203 | (setvbuf (current-output-port) 'line) |
| 204 | (setvbuf (current-error-port) 'line) | 204 | (setvbuf (current-error-port) 'line) |
| 205 | 205 | ||
| 206 | ;; 'makeinfo' looks for "htmlxref.cnf" in the current directory, so | ||
| 207 | ;; copy it right here. | ||
| 208 | (copy-file (string-append #$manual-source "/htmlxref.cnf") | ||
| 209 | "htmlxref.cnf") | ||
| 210 | |||
| 206 | (for-each (lambda (language) | 211 | (for-each (lambda (language) |
| 207 | (let ((opts `("--html" | 212 | (let ((opts `("--html" |
| 208 | "-c" ,(string-append "TOP_NODE_UP_URL=/manual/" | 213 | "-c" ,(string-append "TOP_NODE_UP_URL=/manual/" |
