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

Fix insert-guix-revision to return an id

Browse source 
Rather than an id wrapped in a list.
This commit is contained in:
Christopher Baines 2019-08-31 12:07:22 +01:00
parent d35cc85d52
commit 66df42ae4f
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
guix-data-service/model/guix-revision.scm
View file

@ -36,7 +36,8 @@
store_path "') " store_path "') "
"RETURNING id;")) "RETURNING id;"))
(map car (exec-query conn insert))) (match (exec-query conn insert)
(((id)) id)))
(define (guix-commit-exists? conn commit) (define (guix-commit-exists? conn commit)
(define query (define query