aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/model/utils.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-data-service/model/utils.scm')
-rw-r--r--guix-data-service/model/utils.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/guix-data-service/model/utils.scm b/guix-data-service/model/utils.scm
index f569080..7798e74 100644
--- a/guix-data-service/model/utils.scm
+++ b/guix-data-service/model/utils.scm
@@ -161,9 +161,11 @@
(symbol->string s))
((? string? s)
s)
- ((? null? s)
+ ((? null? n)
;; exec-query-with-null-handling specifies NULL values as '()
- '()))
+ n)
+ (unknown
+ (error (simple-format #f "normalise-values: error: ~A\n" unknown))))
data))
(let* ((existing-entries