aboutsummaryrefslogtreecommitdiff
path: root/module/calp/html/view/search.scm
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--module/calp/html/view/search.scm2
1 files changed, 2 insertions, 0 deletions
diff --git a/module/calp/html/view/search.scm b/module/calp/html/view/search.scm
index 00f00bb0..fd5000df 100644
--- a/module/calp/html/view/search.scm
+++ b/module/calp/html/view/search.scm
@@ -24,6 +24,8 @@
,(when has-query?
(with-output-to-string
(lambda () (pretty-print search-term))))))
+ (label (@ (for "onlyfuture")) "limit to future occurences")
+ (input (@ (name "onlyfuture") (id "onlyfuture") (type checkbox)))
(input (@ (type submit))))
,@(if errors
`((h2 "Error searching")