[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: Fix query in get-count-for-next-level
From: |
Christopher Baines |
Subject: |
02/02: Fix query in get-count-for-next-level |
Date: |
Thu, 9 Mar 2023 09:06:06 -0500 (EST) |
cbaines pushed a commit to branch master
in repository data-service.
commit a20b929e90e5a8f3ff7befff642017d86492017d
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Thu Mar 9 14:05:41 2023 +0000
Fix query in get-count-for-next-level
---
guix-data-service/model/guix-revision-package-derivation.scm | 11 +++++++----
1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/guix-data-service/model/guix-revision-package-derivation.scm
b/guix-data-service/model/guix-revision-package-derivation.scm
index cb73114..2b0ed61 100644
--- a/guix-data-service/model/guix-revision-package-derivation.scm
+++ b/guix-data-service/model/guix-revision-package-derivation.scm
@@ -58,7 +58,7 @@ INNER JOIN guix_revision_package_derivations
WHERE revision_id = $1"
(list guix-revision-id)))
- (define (get-count-for-next-level system target level-counts)
+ (define (get-count-for-next-level system-id target level-counts)
(define next-level
(length level-counts))
@@ -73,10 +73,13 @@ WITH l0 AS (
INNER JOIN guix_revision_package_derivations
ON package_derivations.id
= guix_revision_package_derivations.package_derivation_id
- WHERE revision_id = 19411
- AND system_id = 4
- AND target = $STR$$STR$~A
+ WHERE revision_id = ~A
+ AND system_id = ~A
+ AND target = $STR$~A$STR$~A
)"
+ guix-revision-id
+ system-id
+ target
(if (= next-level 0)
""
(simple-format