diff options
| author | Christopher Baines <mail@cbaines.net> | 2019-03-28 22:42:18 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2019-03-28 22:42:18 +0000 |
| commit | b1ab70a226755208168de3e3ff077e37fb6fb2c1 (patch) | |
| tree | 1a415add25b03ad636706f0d8c0b80f2485b7b9c /guix-data-service/model | |
| parent | 4619b7b5750400d4e88a60650e489f0791589148 (diff) | |
| download | data-service-b1ab70a226755208168de3e3ff077e37fb6fb2c1.tar data-service-b1ab70a226755208168de3e3ff077e37fb6fb2c1.tar.gz | |
Delete duplicate entries in the package-entries list
This can happen when the same package is defined with two names, for example,
with deprecated-package.
Diffstat (limited to 'guix-data-service/model')
| -rw-r--r-- | guix-data-service/model/package.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix-data-service/model/package.scm b/guix-data-service/model/package.scm index bb01986..4d15e73 100644 --- a/guix-data-service/model/package.scm +++ b/guix-data-service/model/package.scm @@ -100,7 +100,7 @@ WHERE packages.id IN ( (filter (lambda (package-entry) (not (vhash-assoc package-entry existing-package-entry-ids))) - package-entries)) + (delete-duplicates package-entries))) (new-package-entry-ids (if (null? missing-package-entries) '() |