diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-01-23 10:37:01 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-01-23 10:37:01 +0100 |
commit | dd6b28d18b089235f6a29fc5435d1815cea76309 (patch) | |
tree | 00b58e11a3135d01df5b4f8f73dad1415a559e7d | |
parent | de71cc4f83977000addf7cacf47bcc26f16725c6 (diff) | |
download | guix-dd6b28d18b089235f6a29fc5435d1815cea76309.tar.gz |
install: Make sure 'info' can decompress the Info files.
* gnu/system/install.scm (log-to-info): Add GZIP to $PATH.
-rw-r--r-- | gnu/system/install.scm | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/gnu/system/install.scm b/gnu/system/install.scm index 35462fff75..98b9d9de2b 100644 --- a/gnu/system/install.scm +++ b/gnu/system/install.scm @@ -29,6 +29,7 @@ #:use-module (gnu packages disk) #:use-module (gnu packages grub) #:use-module (gnu packages texinfo) + #:use-module (gnu packages compression) #:export (installation-os)) ;;; Commentary: @@ -42,10 +43,14 @@ "Return a script that spawns the Info reader on the right section of the manual." (gexp->script "log-to-info" - #~(execl (string-append #$texinfo-4 "/bin/info") "info" - "-d" "/run/current-system/profile/share/info" - "-f" (string-append #$guix "/share/info/guix.info") - "-n" "System Installation"))) + #~(begin + ;; 'gunzip' is needed to decompress the doc. + (setenv "PATH" (string-append #$gzip "/bin")) + + (execl (string-append #$texinfo-4 "/bin/info") "info" + "-d" "/run/current-system/profile/share/info" + "-f" (string-append #$guix "/share/info/guix.info") + "-n" "System Installation")))) (define %backing-directory ;; Sub-directory used as the backing store for copy-on-write. |