From 7984179f5e008ea2627304545c04bb67ddb3990b Mon Sep 17 00:00:00 2001 From: Danjela Lura Date: Thu, 13 Aug 2020 00:30:42 +0200 Subject: [PATCH] Guard against null package metadata ids Signed-off-by: Christopher Baines --- guix-data-service/jobs/load-new-guix-revision.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 258568e..d9fc0dc 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -740,9 +740,10 @@ WHERE job_id = $1" (inferior-packages->package-metadata-ids conn inf packages package-license-set-ids)))) - (with-time-logging "fetching package metadata tsvector entries" - (insert-package-metadata-tsvector-entries - conn new-package-metadata-ids)) + (unless (null? new-package-metadata-ids) + (with-time-logging "fetching package metadata tsvector entries" + (insert-package-metadata-tsvector-entries + conn new-package-metadata-ids))) (with-time-logging "getting package-ids" (inferior-packages->package-ids