A standard Hunchentoot handler must return its output as a string and not send it to *standard-output*.
Edi.
2010/5/31 a fbogdanovic@xnet.hr:
Hi.
When I try to open a web page generated by cl-who I get an empty web page:
(start (make-instance 'acceptor :port 8000))
(push (create-prefix-dispatcher "/index.html" 'index) *dispatch-table*)
(defun index () (with-html-output (*standard-output* nil :indent t) (:html (:head (:title "Test page")) (:body (dotimes (x 10) (:htm (:p "Text"))))))
and page on http://localhost:8000/index.html is empty. The source of the page is just:
</body>
</html> --------------
Where is the problem ? If I remove dynamic code "(dotimes (x 10) ..." then it renders the page correctly.
Thanks _______________________________________________ cl-who-devel site list cl-who-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/cl-who-devel