profiles: Add gzip to $PATH before invoking 'install-info'.

* guix/profiles.scm (info-dir-file)[gzip]: New variable.
  [build]: Add 'setenv' call.
This commit is contained in:
Ludovic Courtès 2014-08-27 11:00:11 +02:00
parent 384de55233
commit 2f0556ae5e

View File

@ -376,10 +376,11 @@ or
(define (info-dir-file manifest)
"Return a derivation that builds the 'dir' file for all the entries of
MANIFEST."
(define texinfo
;; Lazy reference.
(module-ref (resolve-interface '(gnu packages texinfo))
'texinfo))
(define texinfo ;lazy reference
(module-ref (resolve-interface '(gnu packages texinfo)) 'texinfo))
(define gzip ;lazy reference
(module-ref (resolve-interface '(gnu packages compression)) 'gzip))
(define build
#~(begin
(use-modules (guix build utils)
@ -396,6 +397,7 @@ MANIFEST."
(or (scandir infodir info-file?) '()))))
(define (install-info info)
(setenv "PATH" (string-append #+gzip "/bin")) ;for info.gz files
(zero?
(system* (string-append #+texinfo "/bin/install-info")
info (string-append #$output "/share/info/dir"))))