[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Ludovic Courtès |
Date: |
Sat, 17 Aug 2019 13:09:26 -0400 (EDT) |
branch: master
commit 858b6b8c8f2ae7b1ddaf4ae363147121be1f1fe8
Author: Ludovic Courtès <address@hidden>
Date: Sat Aug 17 19:08:33 2019 +0200
templates: Use 'derivation-build-plan'.
* src/cuirass/templates.scm (build-details): Use 'derivation-build-plan'
instead of 'derivation-prerequisites-to-build'.
---
src/cuirass/templates.scm | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index 84097f0..7cca2b2 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -1,6 +1,6 @@
;;; templates.scm -- HTTP API
;;; Copyright © 2018 Tatiana Sholokhova <address@hidden>
-;;; Copyright © 2018 Ludovic Courtès <address@hidden>
+;;; Copyright © 2018, 2019 Ludovic Courtès <address@hidden>
;;; Copyright © 2019 Ricardo Wurmus <address@hidden>
;;;
;;; This file is part of Cuirass.
@@ -158,8 +158,9 @@
(append-map derivation-input-output-paths
(filter (compose derivation-log-file
derivation-input-path)
(with-store store
- (derivation-prerequisites-to-build
- store drv #:substitutable-info (const #f))))))
+ (derivation-build-plan
+ store (list (derivation-input drv))
+ #:substitutable-info (const #f))))))
'()))
(define completed?
(or (= (build-status succeeded) status)