guix/guix
3
4
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
Code Issues Releases Wiki Activity

build: Add and export procedure 'register-root*'.

Browse source 
* guix/scripts/build.scm (register-root*): Add and export it.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Chris Marusich 2017-04-04 20:24:54 -07:00 committed by Ludovic Courtès
parent 50f4ea18c4
commit a09b45da6f
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
guix/scripts/build.scm
View file

@ -52,7 +52,8 @@
show-transformation-options-help
guix-build
register-root))
register-root
register-root*))
(define %default-log-urls
;; Default base URLs for build logs.
@ -123,6 +124,9 @@ found. Return #f if no build log was found."
(leave (_ "failed to create GC root `~a': ~a~%")
root (strerror (system-error-errno args)))))))
(define register-root*
(store-lift register-root))
(define (package-with-source store p uri)
"Return a package based on P but with its source taken from URI. Extract
the new package's version number from URI."