03/03: Fix incorrect query parameters in a couple of builds queries

[Christopher Baines]

cbaines pushed a commit to branch master
in repository data-service.

commit 2a4b16f5e4c46edf9e507e54b4b5d1430deed72d
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Wed May 12 08:28:06 2021 +0100

    Fix incorrect query parameters in a couple of builds queries
    
    The parameters must be strings rather than numbers.
---
 guix-data-service/model/build.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix-data-service/model/build.scm 
b/guix-data-service/model/build.scm
index 3d38e67..0959af8 100644
--- a/guix-data-service/model/build.scm
+++ b/guix-data-service/model/build.scm
@@ -53,7 +53,7 @@
             '())
       ,@(if system
             `(("package_derivations.system_id = $" .
-               ,(system->system-id conn system)))
+               ,(number->string (system->system-id conn system))))
             '())
       ,@(if target
             `(("package_derivations.target = $" . ,target))
@@ -146,7 +146,7 @@ ORDER BY status"))
             '())
       ,@(if system
             `(("package_derivations.system_id = $" .
-               ,(system->system-id conn system)))
+               ,(number->string (system->system-id conn system))))
             '())
       ,@(if target
             `(("package_derivations.target = $" . ,target))