Thu Dec  3 00:07:44 UTC 2009  pix@kepibu.org
  * Fix copy-paste issue.
diff -rN -u old-Oh, Ducks!/cxml.lisp new-Oh, Ducks!/cxml.lisp
--- old-Oh, Ducks!/cxml.lisp	2015-11-29 12:15:24.000000000 +0000
+++ new-Oh, Ducks!/cxml.lisp	2015-11-29 12:15:24.000000000 +0000
@@ -13,7 +13,7 @@
 (defmethod make-template ((kind (eql 'xml)) (spec cons))
   (destructuring-bind (&key parser model)
       (append (when (%spec-includes-opts spec) (second spec))
-              (list :model 'pt))
+              (list :model 'dom))
     (make-instance 'xml-template
                    :parser (or parser (rcurry #'cxml:parse (get-handler-for-model model)))
                    :spec spec)))