nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

install: Make sure 'info' can decompress the Info files. 

* gnu/system/install.scm (log-to-info): Add GZIP to $PATH.
This commit is contained in:
Ludovic Courtès 2015-01-23 10:37:01 +01:00
parent de71cc4f83
commit dd6b28d18b
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gnu/system/install.scm
View File

@ -29,6 +29,7 @@
#:use-module (gnu packages disk) #:use-module (gnu packages disk)
#:use-module (gnu packages grub) #:use-module (gnu packages grub)
#:use-module (gnu packages texinfo) #:use-module (gnu packages texinfo)
#:use-module (gnu packages compression)
#:export (installation-os)) #:export (installation-os))
;;; Commentary: ;;; Commentary:
@ -42,10 +43,14 @@
"Return a script that spawns the Info reader on the right section of the "Return a script that spawns the Info reader on the right section of the
manual." manual."
(gexp->script "log-to-info" (gexp->script "log-to-info"
#~(execl (string-append #$texinfo-4 "/bin/info") "info" #~(begin
"-d" "/run/current-system/profile/share/info" ;; 'gunzip' is needed to decompress the doc.
"-f" (string-append #$guix "/share/info/guix.info") (setenv "PATH" (string-append #$gzip "/bin"))
"-n" "System Installation")))
(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 (define %backing-directory
;; Sub-directory used as the backing store for copy-on-write. ;; Sub-directory used as the backing store for copy-on-write.