diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-09-23 22:44:53 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-09-23 22:44:53 +0200 |
| commit | d27ff21e430cd38b02bd70a0dc8d60c9c2736f83 (patch) | |
| tree | 363f6442c9a0bce47638b97bd3f213ede292b393 | |
| parent | 6cf84a43bb6160e11ede96820a8bc563aa7461ef (diff) | |
| download | cuirass-d27ff21e430cd38b02bd70a0dc8d60c9c2736f83.tar cuirass-d27ff21e430cd38b02bd70a0dc8d60c9c2736f83.tar.gz | |
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'.
| -rw-r--r-- | src/cuirass/templates.scm | 8 |
1 files 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)) |