Fixup tests

2024-01-18 15:25:41 +00:00 · 2024-01-18 15:25:41 +00:00 · b81e7ea950
commit b81e7ea950
parent c1d2f3a1b7
2 changed files with 9 additions and 5 deletions
--- 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"