guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[no subject]


From: Ludovic Courtès
Date: Mon, 23 Sep 2019 16:46:55 -0400 (EDT)

branch: master
commit d27ff21e430cd38b02bd70a0dc8d60c9c2736f83
Author: Ludovic Courtès <address@hidden>
Date:   Mon Sep 23 22:44:53 2019 +0200

    templates: Fix type errors in build details page.
    
    This is a followup to 858b6b8c8f2ae7b1ddaf4ae363147121be1f1fe8.
    
    * src/cuirass/templates.scm (build-details)[blocking-outputs]: Fix type
    errors when dealing with the result of 'derivation-build-plan'.
---
 src/cuirass/templates.scm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index 7cca2b2..c584dae 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -155,8 +155,12 @@
                    (drv (false-if-exception
                          (read-derivation-from-file
                           (assq-ref build #:derivation)))))
-          (append-map derivation-input-output-paths
-                      (filter (compose derivation-log-file 
derivation-input-path)
+          (append-map (lambda (drv)
+                        (match (derivation->output-paths drv)
+                          (((_ . items) ...)
+                           items)))
+                      (filter (compose derivation-log-file
+                                       derivation-file-name)
                               (with-store store
                                 (derivation-build-plan
                                  store (list (derivation-input drv))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]