Let FORM-QUERY return '() if the query string is #f.
This commit is contained in:
parent
d5dcbace37
commit
4923286d96
|
@ -31,7 +31,10 @@
|
|||
;;; (("button" . "on") ("reply" . "Oh, yes"))
|
||||
;;; This works only for GET and POST methods.
|
||||
|
||||
(define form-query parse-html-form-query)
|
||||
(define (form-query q)
|
||||
(if q
|
||||
(parse-html-form-query q)
|
||||
'()))
|
||||
|
||||
;; Bindings of POST requests can be read only once, since they are
|
||||
;; read from an input port. So we have to cache them, for the case of
|
||||
|
|
Loading…
Reference in New Issue