aboutsummaryrefslogtreecommitdiff
path: root/nar-herder/database.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-12-14 12:53:37 +0000
committerChristopher Baines <mail@cbaines.net>2021-12-14 12:53:37 +0000
commit2521e82dad6342de29859cf910436218456133c6 (patch)
tree4a413e47f37707491e3b3e2d743ec7bd50e6ff97 /nar-herder/database.scm
parentaac0280c1da25f36496e92a80016c4729f2451b8 (diff)
downloadnar-herder-2521e82dad6342de29859cf910436218456133c6.tar
nar-herder-2521e82dad6342de29859cf910436218456133c6.tar.gz
Add missing sqlite-bind-arguments in database-select-narinfo-files
Diffstat (limited to 'nar-herder/database.scm')
-rw-r--r--nar-herder/database.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/nar-herder/database.scm b/nar-herder/database.scm
index c6daf8c..31fe5e7 100644
--- a/nar-herder/database.scm
+++ b/nar-herder/database.scm
@@ -493,6 +493,11 @@ INNER JOIN narinfo_files
ON narinfos.id = narinfo_files.narinfo_id
WHERE substr(narinfos.store_path, 12, 32) = :hash"
#:cache? #t)))
+
+ (sqlite-bind-arguments
+ statement
+ #:hash hash)
+
(let ((result
(sqlite-map
(match-lambda