summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2012-03-11 11:06:39 +0100
committerAndy Wingo <wingo@pobox.com>2012-03-11 11:06:39 +0100
commit9effafa444a021d1564800aa81a35098651c5fec (patch)
tree85367c9d0822902d935777a7772702500995f97a
parent8b49b6b1f5522dfbb78c9249cf219a29264df490 (diff)
downloadguile-9effafa444a021d1564800aa81a35098651c5fec.tar.gz
fix bad-request-printer
* module/web/request.scm (bad-request-printer): Fix printer to expect args as a list.
-rw-r--r--module/web/request.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/web/request.scm b/module/web/request.scm
index fd4f02bbd..40d4a668f 100644
--- a/module/web/request.scm
+++ b/module/web/request.scm
@@ -133,7 +133,7 @@
(define (bad-request-printer port key args default-printer)
(apply (case-lambda
- ((msg . args)
+ ((msg args)
(display "Bad request: " port)
(apply format port msg args)
(newline port))