diff options
| -rw-r--r-- | guix-data-service/model/derivation.scm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/guix-data-service/model/derivation.scm b/guix-data-service/model/derivation.scm index 8614491..98b89b8 100644 --- a/guix-data-service/model/derivation.scm +++ b/guix-data-service/model/derivation.scm @@ -251,7 +251,15 @@ ORDER BY derivations.system DESC, "derivation_outputs.derivation_output_details_id = derivation_output_details.id " "WHERE derivation_id = $1")) - (exec-query conn query (list (number->string id)))) + (map + (match-lambda + ((name path hash_algorithm hash recursive) + (list name + path + hash_algorithm + hash + (string=? recursive "t")))) + (exec-query conn query (list (number->string id))))) (define (select-derivation-inputs-by-derivation-id conn id) (define query |