From: sgunderson@bigfoot.com <> Date: Thu, 1 Mar 2007 14:09:33 +0000 (+0100) Subject: Fix some junk; Cleaner doesn't take an object. X-Git-Url: https://git.sesse.net/?a=commitdiff_plain;ds=sidebyside;h=d86dd6f01d6df81558cde479f842121ac390150f;p=xml-template Fix some junk; Cleaner doesn't take an object. --- diff --git a/perl-sax/XML/TemplateSAX.pm b/perl-sax/XML/TemplateSAX.pm index 638f4b2..b473dd0 100644 --- a/perl-sax/XML/TemplateSAX.pm +++ b/perl-sax/XML/TemplateSAX.pm @@ -37,7 +37,7 @@ sub process_file { $writer = XML::SAX::Writer->new(Output => \$str); if ($clean) { - $cleaner = XML::TemplateSAX::Cleaner->new(Handler => $writer, Content => $obj); + $cleaner = XML::TemplateSAX::Cleaner->new(Handler => $writer); $filter = XML::TemplateSAX::Handler->new(Handler => $cleaner, Content => $obj); } else { $filter = XML::TemplateSAX::Handler->new(Handler => $writer, Content => $obj); @@ -59,7 +59,7 @@ sub process_file_to_buffer { $buffer = XML::TemplateSAX::Buffer->new; if ($clean) { - $cleaner = XML::TemplateSAX::Cleaner->new(Handler => $buffer, Content => $obj); + $cleaner = XML::TemplateSAX::Cleaner->new(Handler => $buffer); $filter = XML::TemplateSAX::Handler->new(Handler => $cleaner, Content => $obj); } else { $filter = XML::TemplateSAX::Handler->new(Handler => $buffer, Content => $obj);