]> iEval git - html-element-library.git/blobdiff - t/defmap.t
Fix tests
[html-element-library.git] / t / defmap.t
index c26ab43ec67b207bbb6a70f0da0001d470a00457..26eeeedcdf577faa3594450a540a92dc135c7c5a 100644 (file)
@@ -1,12 +1,10 @@
 # This might look like shell script, but it's actually -*- perl -*-
 use strict;use warnings;
-use lib qw(t/ t/m/);
 
 use File::Slurp;
 use Test::More qw(no_plan);
 use Test::XML;
 
-use TestUtils;
 use HTML::TreeBuilder;
 use HTML::Element::Library;
 
@@ -22,11 +20,11 @@ sub tage {
 
   $tree->defmap(smap => \%data, 1);
 
-  my $g = ptree($tree, "$root.gen");
+  my $g = $tree->as_XML;
   my $e = File::Slurp::read_file("$root.exp");
   warn "generated:$g:\nexpected:$e:";
 
-  is_xml ($g, $e, "HTML for defmap");
+  is_xml ($g, $e, "XML for defmap");
 }
 
 
This page took 0.021195 seconds and 4 git commands to generate.