mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-30 06:50:31 +02:00
Code Activity

fix bad-request-printer

Browse source 
* module/web/request.scm (bad-request-printer): Fix printer to expect
  args as a list.
This commit is contained in:
Andy Wingo 2012-03-11 11:06:39 +01:00
parent 8b49b6b1f5
commit 9effafa444
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/web/request.scm
View file

@ -133,7 +133,7 @@
(define (bad-request-printer port key args default-printer) (define (bad-request-printer port key args default-printer)
(apply (case-lambda (apply (case-lambda
((msg . args) ((msg args)
(display "Bad request: " port) (display "Bad request: " port)
(apply format port msg args) (apply format port msg args)
(newline port)) (newline port))