diff options
author | Christopher Baines <mail@cbaines.net> | 2019-12-15 15:51:46 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2019-12-16 15:19:02 +0000 |
commit | bdcba528fc6c6ba2db6489958229ad94e8ef9ca5 (patch) | |
tree | 2636e7547007d37ac22a13d468b92c65defe0d27 /guix-data-service | |
parent | a41249d8fe327536fc6deb8c28080a0abe5d31f4 (diff) | |
download | data-service-bdcba528fc6c6ba2db6489958229ad94e8ef9ca5.tar data-service-bdcba528fc6c6ba2db6489958229ad94e8ef9ca5.tar.gz |
Fix group-to-alist
To not just append elements to the alist.
Diffstat (limited to 'guix-data-service')
-rw-r--r-- | guix-data-service/model/utils.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix-data-service/model/utils.scm b/guix-data-service/model/utils.scm index af60e45..028d318 100644 --- a/guix-data-service/model/utils.scm +++ b/guix-data-service/model/utils.scm @@ -89,7 +89,7 @@ (match (assoc key result) ((_ . existing-values) `((,key . ,(cons value existing-values)) - ,@result)) + ,@(alist-delete key result))) (#f `((,key . (,value)) ,@result)))))) |