me
/
guix
Archived
1
0
Fork 0
Code

download: Perform derivations locally. 

* guix/download.scm (url-fetch): Pass #:local-build? #t to
  'build-expression->derivation'.
* guix/git-download.scm (git-fetch): Likewise.
master
Ludovic Courtès 2014-03-05 23:25:37 +01:00
parent 8b3099cf03
commit 56c72822a8
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guix/download.scm
View File

@ -242,7 +242,11 @@ must be a list of symbol/URL-list pairs."
(guix build utils) (guix build utils)
(guix ftp-client)) (guix ftp-client))
#:guile-for-build guile-for-build #:guile-for-build guile-for-build
#:env-vars env-vars))) #:env-vars env-vars
;; In general, offloading downloads is not a
;; good idea.
#:local-build? #t)))
(define* (download-to-store store url #:optional (name (basename url)) (define* (download-to-store store url #:optional (name (basename url))
#:key (log (current-error-port))) #:key (log (current-error-port)))

3
guix/git-download.scm
View File

@ -84,6 +84,7 @@ type HASH-ALGO (a symbol). Use NAME as the file name, or a generic name if
#:recursive? #t #:recursive? #t
#:modules '((guix build git) #:modules '((guix build git)
(guix build utils)) (guix build utils))
#:guile-for-build guile-for-build))) #:guile-for-build guile-for-build
#:local-build? #t)))
;;; git-download.scm ends here ;;; git-download.scm ends here