02/02: Make the revision derivation counts numbers

[Christopher Baines]

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

commit 11ec8a806494047589f119b0db2af862e1c41ae2
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat Jan 22 18:47:38 2022 +0000

    Make the revision derivation counts numbers
---
 guix-data-service/model/package-derivation.scm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/guix-data-service/model/package-derivation.scm 
b/guix-data-service/model/package-derivation.scm
index cd63daf..109e0f1 100644
--- a/guix-data-service/model/package-derivation.scm
+++ b/guix-data-service/model/package-derivation.scm
@@ -63,4 +63,10 @@ WHERE package_derivations.id IN (
 GROUP BY systems.system, package_derivations.target
 ORDER BY systems.system DESC, package_derivations.target ASC")
 
-  (exec-query conn query (list commit-hash)))
+  (map
+   (match-lambda
+     ((system target count)
+      (list system
+            target
+            (string->number count))))
+   (exec-query conn query (list commit-hash))))