1
0
Fork 0

don't display doctype if unnecessary

* tekuti/page-helpers.scm (respond): Don't display a doctype if we
  aren't given one.
This commit is contained in:
Andy Wingo 2010-11-22 23:42:10 +01:00
parent dda89fe5bf
commit 473bd070ae

View file

@ -95,7 +95,7 @@
(lambda (port) (lambda (port)
(if sxml (if sxml
(begin (begin
(display doctype port) (if doctype (display doctype port))
(sxml->xml sxml port)))))) (sxml->xml sxml port))))))
(define (unparse-www-form-urlencoded alist) (define (unparse-www-form-urlencoded alist)