X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ftags.t;h=9979e7f98bc5fb35bc8b08d13c04e2b0636877ce;hb=49a6c0b590240b20d1918cd4c0b5579133036e0c;hp=c58e7e5d604267eea582a35ce8d9f9edb2cbb83a;hpb=39f67b4da2b19dd6003dd854bd09741d1c377541;p=catagits%2FWeb-Simple.git diff --git a/t/tags.t b/t/tags.t index c58e7e5..9979e7f 100644 --- a/t/tags.t +++ b/t/tags.t @@ -31,7 +31,7 @@ use Test::More qw(no_plan); } is( - join(', ', XML::Tags::sanitize Foo::foo()), + join(', ', XML::Tags::to_xml_string Foo::foo()), ', , ', 'open tags ok' ); @@ -39,13 +39,13 @@ is( ok(!eval { Foo::bar(); 1 }, 'Death on use of unimported tag'); is( - join(', ', XML::Tags::sanitize Foo::baz()), + join(', ', XML::Tags::to_xml_string Foo::baz()), '', 'close tag ok' ); is( - join('', XML::Tags::sanitize Foo::quux), + join('', HTML::Tags::to_html_string Foo::quux), 'YAY', 'HTML tags ok' );