Guard against null package metadata ids

Signed-off-by: Christopher Baines <mail@cbaines.net>
This commit is contained in:
Danjela Lura 2020-08-13 00:30:42 +02:00 committed by Christopher Baines
parent 086cb9c9d0
commit 7984179f5e

View file

@ -740,9 +740,10 @@ WHERE job_id = $1"
(inferior-packages->package-metadata-ids (inferior-packages->package-metadata-ids
conn inf packages package-license-set-ids)))) conn inf packages package-license-set-ids))))
(with-time-logging "fetching package metadata tsvector entries" (unless (null? new-package-metadata-ids)
(insert-package-metadata-tsvector-entries (with-time-logging "fetching package metadata tsvector entries"
conn new-package-metadata-ids)) (insert-package-metadata-tsvector-entries
conn new-package-metadata-ids)))
(with-time-logging "getting package-ids" (with-time-logging "getting package-ids"
(inferior-packages->package-ids (inferior-packages->package-ids