aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/model
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-01-14 22:09:32 +0000
committerChristopher Baines <mail@cbaines.net>2021-01-14 22:09:32 +0000
commit54c5fbe9fba59c9118eee2128bf55818ccadb52b (patch)
tree9aaf4c7e986e8f86ab52ff78aa2cad94bab840ef /guix-data-service/model
parentea7331ad25cacc56cfbb889d1cef5301953b05bc (diff)
downloaddata-service-54c5fbe9fba59c9118eee2128bf55818ccadb52b.tar
data-service-54c5fbe9fba59c9118eee2128bf55818ccadb52b.tar.gz
Fix a Squee null handling issue with latest fixed output derivations
Diffstat (limited to 'guix-data-service/model')
-rw-r--r--guix-data-service/model/derivation.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/guix-data-service/model/derivation.scm b/guix-data-service/model/derivation.scm
index 3e211be..f41f55c 100644
--- a/guix-data-service/model/derivation.scm
+++ b/guix-data-service/model/derivation.scm
@@ -646,13 +646,13 @@ LIMIT $4"))
(map (match-lambda
((derivation_file_name latest_build)
`((derivation_file_name . ,derivation_file_name)
- (latest_build . ,(if latest_build
+ (latest_build . ,(if (null? latest_build)
+ 'null
(map (match-lambda
((key . value)
(cons (string->symbol key)
value)))
- (json-string->scm latest_build))
- 'null)))))
+ (json-string->scm latest_build)))))))
(exec-query-with-null-handling
conn
query