Revision: 3745 Author: hans URL: http://bknr.net/trac/changeset/3745
Fix bug that caused top-level element of a template to be output two times.
U trunk/bknr/web/src/web/template-handler.lisp
Modified: trunk/bknr/web/src/web/template-handler.lisp =================================================================== --- trunk/bknr/web/src/web/template-handler.lisp 2008-08-27 23:57:40 UTC (rev 3744) +++ trunk/bknr/web/src/web/template-handler.lisp 2008-08-28 13:52:36 UTC (rev 3745) @@ -165,7 +165,8 @@ (sax:start-element *html-sink* (node-ns toplevel) (node-name toplevel) (node-name toplevel) (cxml-xmls::compute-attributes/lnames toplevel t)) (let ((*template-expander* expander)) - (emit-template-node expander toplevel)) + (dolist (node (node-children toplevel)) + (emit-template-node expander node))) (sax:end-element *html-sink* (node-ns toplevel) (node-name toplevel) (node-name toplevel)))
(defun find-template (dir components)