aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2024-01-18 15:25:41 +0000
committerChristopher Baines <mail@cbaines.net>2024-01-18 15:34:40 +0000
commitb81e7ea9500ba67ef498e5669b6facfe7acd1600 (patch)
tree8b678cd4100303e034ebd894f7eaeddf38267a60 /guix-data-service
parentc1d2f3a1b7ba20ad3f56840a160ee1ec08cd3a64 (diff)
downloaddata-service-b81e7ea9500ba67ef498e5669b6facfe7acd1600.tar
data-service-b81e7ea9500ba67ef498e5669b6facfe7acd1600.tar.gz
Fixup tests
Diffstat (limited to 'guix-data-service')
-rw-r--r--guix-data-service/model/package-metadata.scm8
1 files changed, 5 insertions, 3 deletions
diff --git a/guix-data-service/model/package-metadata.scm b/guix-data-service/model/package-metadata.scm
index aaaee68..17f4e10 100644
--- a/guix-data-service/model/package-metadata.scm
+++ b/guix-data-service/model/package-metadata.scm
@@ -410,9 +410,11 @@ WHERE packages.id IN (
(with-time-logging "preparing location ids"
(map (match-lambda
((_ location rest ...)
- (location->location-id
- conn
- location)))
+ (if location
+ (location->location-id
+ conn
+ location)
+ NULL)))
package-metadata))
license-set-ids
(with-time-logging "preparing package description set ids"