gnu: guix: Rework 0.4 hack to gracefully handle lack of tarball.
* gnu/packages/package-management.scm (guix-0.4): Fall back to the source of GIUX when the tarball doesn't exist.master
parent
9fcc355529
commit
f1dfb7c47c
|
@ -107,10 +107,16 @@ Guix is based on the Nix package manager.")
|
||||||
(define-public guix-0.4
|
(define-public guix-0.4
|
||||||
;; XXX: Hack to allow the use of a 0.4ish tarball. This assumes that you
|
;; XXX: Hack to allow the use of a 0.4ish tarball. This assumes that you
|
||||||
;; have run 'make dist' in your build tree. Remove when 0.4 is out.
|
;; have run 'make dist' in your build tree. Remove when 0.4 is out.
|
||||||
(package (inherit guix)
|
(let* ((builddir (dirname
|
||||||
(version "0.4rc")
|
|
||||||
(source (let ((builddir (dirname
|
|
||||||
(canonicalize-path
|
(canonicalize-path
|
||||||
(dirname (search-path %load-path
|
(dirname (search-path %load-path
|
||||||
"guix/config.scm"))))))
|
"guix/config.scm")))))
|
||||||
(string-append builddir "/guix-0.4.tar.gz")))))
|
(tarball (string-append builddir "/guix-0.4.tar.gz")))
|
||||||
|
(package (inherit guix)
|
||||||
|
(version "0.4rc")
|
||||||
|
(source (if (file-exists? tarball)
|
||||||
|
tarball
|
||||||
|
(begin
|
||||||
|
(format (current-error-port)
|
||||||
|
"warning: 'guix-0.4.tar.gz' not found~%")
|
||||||
|
(package-source guix)))))))
|
||||||
|
|
Reference in New Issue