cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix data input for package-metadata

Browse source 
Represent non-string home pages as NULL, and delete duplicates, as package
metadata entries can be duplicated.
This commit is contained in:
Christopher Baines 2019-09-05 13:54:03 +02:00
parent 4c67160b92
commit 2cb389037b
1 changed files with 15 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

17
guix-data-service/model/package-metadata.scm
View file

@ -148,5 +148,18 @@ WHERE packages.id IN (
conn conn
"package_metadata" "package_metadata"
'(synopsis description home_page location_id license_set_id) '(synopsis description home_page location_id license_set_id)
package-metadata)) (map (match-lambda
((synopsis description home-page location-id license-set-id)
(list synopsis
description
(if (string? home-page)
home-page
NULL)
location-id
license-set-id)))
package-metadata)
;; There can be duplicated entires in package-metadata, for example where
;; you have one package definition which interits from another, and just
;; overrides the version and the source, the package_metadata entries for
;; both definitions will be the same.
#:delete-duplicates? #t))