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

Fix group-to-alist

Browse source 
To not just append elements to the alist.
This commit is contained in:
Christopher Baines 2019-12-15 15:51:46 +00:00
parent a41249d8fe
commit bdcba528fc
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
guix-data-service/model/utils.scm
View file

@ -89,7 +89,7 @@
(match (assoc key result) (match (assoc key result)
((_ . existing-values) ((_ . existing-values)
`((,key . ,(cons value existing-values)) `((,key . ,(cons value existing-values))
,@result)) ,@(alist-delete key result)))
(#f (#f
`((,key . (,value)) `((,key . (,value))
,@result)))))) ,@result))))))