aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/model/derivation.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-01-04 22:15:39 +0000
committerChristopher Baines <mail@cbaines.net>2020-01-04 22:15:39 +0000
commitd7036bdd377f4a70fd28b2f2ef5a5c78aec22e9a (patch)
tree92c19d6f89a25de6ed6da7db0b9e6800c7d7a09a /guix-data-service/model/derivation.scm
parent6cb7e9225708dabdbbbe8a8f9272a42010ed900c (diff)
downloaddata-service-d7036bdd377f4a70fd28b2f2ef5a5c78aec22e9a.tar
data-service-d7036bdd377f4a70fd28b2f2ef5a5c78aec22e9a.tar.gz
Implement the search query input on the derivation outputs page
Diffstat (limited to 'guix-data-service/model/derivation.scm')
-rw-r--r--guix-data-service/model/derivation.scm8
1 files changed, 8 insertions, 0 deletions
diff --git a/guix-data-service/model/derivation.scm b/guix-data-service/model/derivation.scm
index 7416512..cd850ae 100644
--- a/guix-data-service/model/derivation.scm
+++ b/guix-data-service/model/derivation.scm
@@ -423,6 +423,7 @@ ORDER BY derivations.file_name
(define* (select-derivation-outputs-in-revision conn
commit-hash
#:key
+ search-query
output-consistency
system
target
@@ -477,6 +478,9 @@ WHERE guix_revisions.commit = $1
'())
,@(if target
'(" AND package_derivations.target = ")
+ '())
+ ,@(if search-query
+ '(" AND derivation_output_details.path LIKE ")
'()))))
(string-concatenate
(map (lambda (query count)
@@ -549,6 +553,10 @@ ORDER BY derivation_output_details.path
'())
,@(if target
(list target)
+ '())
+ ,@(if search-query
+ (list (string-append
+ "%" search-query "%"))
'())))))
(define (fix-derivation-output-details-hash-encoding conn)