Fix tests

[html-element-library.git] / t / iter2.t

diff --git a/t/iter2.t b/t/iter2.t
index 1a7950107e97c10e137a4ca6ebb1083366346c23..8f3f31209ff2d537db5137c06f26dce64140a134 100644 (file)
--- a/t/iter2.t
+++ b/t/iter2.t
@@ -1,14 +1,12 @@
 # This might look like shell script, but it's actually -*- perl -*-
 use strict;
-use lib qw(t/ t/m/);
-
 
 use File::Slurp;
 use Test::More qw(no_plan);
 
-use TestUtils;
 use HTML::TreeBuilder;
 use HTML::Element::Library;
+use Test::XML;
 
 my $root = 't/html/iter2';
 
@@ -42,7 +40,4 @@ $tree->iter2(
  );
   
 
-  my $generated_html = ptree($tree, "$root.gen");
-
-  is ($generated_html, File::Slurp::read_file("$root.exp"), 
-      "HTML for generated li");
+is_xml ($tree->as_XML, scalar File::Slurp::read_file("$root.exp"), "XML for generated li");