me
/
guix
Archived
1
0
Fork 0
Code

ui: 'show-what-to-build' returns two values, for builds and downloads. 

* guix/ui.scm (show-what-to-build): Return two values.
master
Ludovic Courtès 2020-03-22 11:52:41 +01:00
parent bec3474107
commit 883a1765a6
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
guix/ui.scm
View File

@ -913,8 +913,10 @@ that the rest."
derivations listed in DRV using MODE, a 'build-mode' value. The elements of derivations listed in DRV using MODE, a 'build-mode' value. The elements of
DRV can be either derivations or derivation inputs. DRV can be either derivations or derivation inputs.
Return #t if there's something to build, #f otherwise. When USE-SUBSTITUTES?, Return two values: a Boolean indicating whether there's something to build,
check and report what is prerequisites are available for download." and a Boolean indicating whether there's something to download. When
USE-SUBSTITUTES?, check and report what is prerequisites are available for
download."
(define inputs (define inputs
(map (match-lambda (map (match-lambda
((? derivation? drv) (derivation-input drv)) ((? derivation? drv) (derivation-input drv))
@ -1041,7 +1043,7 @@ check and report what is prerequisites are available for download."
(check-available-space installed-size) (check-available-space installed-size)
(pair? build/full))) (values (pair? build/full) (pair? download))))
(define show-what-to-build* (define show-what-to-build*
(store-lift show-what-to-build)) (store-lift show-what-to-build))