me
/
guix
Archived
1
0
Fork 0
Code

gnu: vera: Use invoke. 

* gnu/packages/dictionaries.scm (vera)[arguments]: Use invoke and remove
vestigial plumbing in the builder.
master
Mark H Weaver 2018-03-27 19:56:54 -04:00
parent 09b8c04e22
commit 22fc1b90f0
No known key found for this signature in database
GPG Key ID: 7CEF29847562C516
1 changed files with 7 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gnu/packages/dictionaries.scm
View File

@ -62,7 +62,7 @@
(gz (assoc-ref %build-inputs "gzip"))
(texi (assoc-ref %build-inputs "texinfo")))
(setenv "PATH" (string-append gz "/bin"))
(system* (string-append tar "/bin/tar") "xvf" source)
(invoke (string-append tar "/bin/tar") "xvf" source)
(chdir (string-append "vera-" ,version))
(mkdir-p info)
@ -70,14 +70,12 @@
;; XXX: Use '--force' because the document is unhappy
;; with Texinfo 5 (yes, documents can be unhappy.)
(and (zero?
(system* (string-append texi "/bin/makeinfo")
"vera.texi" "--force" "-o"
(string-append info "/vera.info")))
(zero?
(system* (string-append texi "/bin/makeinfo")
"vera.texi" "--force" "--html" "-o"
(string-append html "/vera.html"))))))
(invoke (string-append texi "/bin/makeinfo")
"vera.texi" "--force" "-o"
(string-append info "/vera.info"))
(invoke (string-append texi "/bin/makeinfo")
"vera.texi" "--force" "--html" "-o"
(string-append html "/vera.html"))))
#:modules ((guix build utils))))
(native-inputs `(("texinfo" ,texinfo)
("tar" ,tar)