aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2019-12-15 15:51:46 +0000
committerChristopher Baines <mail@cbaines.net>2019-12-16 15:19:02 +0000
commitbdcba528fc6c6ba2db6489958229ad94e8ef9ca5 (patch)
tree2636e7547007d37ac22a13d468b92c65defe0d27 /guix-data-service
parenta41249d8fe327536fc6deb8c28080a0abe5d31f4 (diff)
downloaddata-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.scm2
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))))))