aboutsummaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorMathieu Lirzin <mthl@gnu.org>2016-06-12 15:28:49 +0200
committerMathieu Lirzin <mthl@gnu.org>2016-06-13 18:11:25 +0200
commit7d7251a974b27a8ef4137efa8b80232aca1c96e7 (patch)
tree0cebe28decc061f5e7718ca92ac86ca5226191a9 /bin
parente5609c29c4b3e570772f3d0e5b310bcf1078fe6d (diff)
downloadcuirass-7d7251a974b27a8ef4137efa8b80232aca1c96e7.tar
cuirass-7d7251a974b27a8ef4137efa8b80232aca1c96e7.tar.gz
cuirass: Adapt output of 'build-packages'.
* bin/cuirass.in (build-packages): Display derivation and output file names.
Diffstat (limited to 'bin')
-rw-r--r--bin/cuirass.in8
1 files changed, 6 insertions, 2 deletions
diff --git a/bin/cuirass.in b/bin/cuirass.in
index f94099b..bfd7168 100644
--- a/bin/cuirass.in
+++ b/bin/cuirass.in
@@ -80,8 +80,12 @@ DIR if required."
"Build JOBS which is a list of <job> objects."
(map (match-lambda
(($ <job> name drv)
- (format #t "building ~A => ~A~%" name drv)
- ((guix-variable 'derivations 'build-derivations) store (list drv))))
+ (format #t "building ~A...~%" drv)
+ ((guix-variable 'derivations 'build-derivations)
+ store (list drv))
+ (format #t "~A~%"
+ ((guix-variable 'derivations
+ 'derivation-path->output-path) drv))))
jobs))
(define (evaluate store dir spec args)