Wed Nov 18 10:25:48 UTC 2009 pix@kepibu.org * Try to set a sensible default for *default-parser* diff -rN -u old-Oh, Ducks!/chtml.lisp new-Oh, Ducks!/chtml.lisp --- old-Oh, Ducks!/chtml.lisp 2015-04-10 16:18:23.000000000 +0000 +++ new-Oh, Ducks!/chtml.lisp 2015-04-10 16:18:23.000000000 +0000 @@ -24,3 +24,5 @@ (make-instance 'pt-template :spec spec)) (defmethod make-template-for-parser ((parser (eql :pt)) spec) (make-template-for-parser 'pt spec)) + +(unless *default-parser* (setf *default-parser* 'pt)) diff -rN -u old-Oh, Ducks!/cxml.lisp new-Oh, Ducks!/cxml.lisp --- old-Oh, Ducks!/cxml.lisp 2015-04-10 16:18:23.000000000 +0000 +++ new-Oh, Ducks!/cxml.lisp 2015-04-10 16:18:23.000000000 +0000 @@ -12,3 +12,5 @@ (make-instance 'dom-template :spec spec)) (defmethod make-template-for-parser ((parser (eql :dom)) spec) (make-template-for-parser 'dom spec)) + +(unless *default-parser* (setf *default-parser* 'dom))