gnu: guix: Provide the correct version string.
Fixes <https://bugs.gnu.org/29429>. Reported by Arun Isaac <arunisaac@systemreboot.net>. * gnu/packages/package-management.scm (guix)[arguments]: Move 'bootstrap' phase before 'configure'. Create '.tarball-version' file.
This commit is contained in:
parent
65c0f43649
commit
91c619ebdf
|
@ -136,13 +136,17 @@
|
||||||
(ice-9 rdelim))
|
(ice-9 rdelim))
|
||||||
|
|
||||||
#:phases (modify-phases %standard-phases
|
#:phases (modify-phases %standard-phases
|
||||||
(add-after 'unpack 'bootstrap
|
(add-before 'configure 'bootstrap
|
||||||
(lambda _
|
(lambda _
|
||||||
;; Make sure 'msgmerge' can modify the PO files.
|
;; Make sure 'msgmerge' can modify the PO files.
|
||||||
(for-each (lambda (po)
|
(for-each (lambda (po)
|
||||||
(chmod po #o666))
|
(chmod po #o666))
|
||||||
(find-files "." "\\.po$"))
|
(find-files "." "\\.po$"))
|
||||||
|
|
||||||
|
(call-with-output-file ".tarball-version"
|
||||||
|
(lambda (port)
|
||||||
|
(display ,version port)))
|
||||||
|
|
||||||
(zero? (system* "sh" "bootstrap"))))
|
(zero? (system* "sh" "bootstrap"))))
|
||||||
(add-before
|
(add-before
|
||||||
'configure 'copy-bootstrap-guile
|
'configure 'copy-bootstrap-guile
|
||||||
|
|
Loading…
Reference in New Issue