Specify an invalid parameter message in parse-datetime
This commit is contained in:
parent
d0a4143c7c
commit
8cafd93f22
1 changed files with 3 additions and 1 deletions
|
|
@ -214,7 +214,9 @@
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(string->date s "~Y-~m-~d ~H:~M:~S"))
|
(string->date s "~Y-~m-~d ~H:~M:~S"))
|
||||||
(lambda (key . args)
|
(lambda (key . args)
|
||||||
(make-invalid-query-parameter s #f))))
|
(make-invalid-query-parameter
|
||||||
|
s
|
||||||
|
"Unable to parse date, please use YYYY-MM-DD HH-MM-SS as the format."))))
|
||||||
|
|
||||||
(define (parse-checkbox-value s)
|
(define (parse-checkbox-value s)
|
||||||
(string=? s "on"))
|
(string=? s "on"))
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue