From 70669dc1488834d4f2b9347069170feb1ea74aaa Mon Sep 17 00:00:00 2001
From: Terrence Brannon <metaperl@gmail.com>
Date: Tue, 10 Jan 2012 14:54:25 -0500
Subject: [PATCH] apply fixes based on M. David Moussa Leo Keita's feedback

---
 t/crunch.t | 3 ++-
 t/prune.t  | 2 +-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/t/crunch.t b/t/crunch.t
index 275a021..00f7947 100644
--- a/t/crunch.t
+++ b/t/crunch.t
@@ -8,6 +8,7 @@ use Test::More;
 use TestUtils;
 use HTML::TreeBuilder;
 use HTML::Element::Library;
+use Test::XML;
 
 sub tage {
 
@@ -20,7 +21,7 @@ sub tage {
 
   my $generated_html = ptree($tree, "$root.gen");
 
-  is ($generated_html, File::Slurp::read_file("$root.exp"), "HTML for crunch");
+  is_xml ($generated_html, File::Slurp::read_file("$root.exp"), "HTML for crunch");
 }
 
 
diff --git a/t/prune.t b/t/prune.t
index 5086257..af343db 100644
--- a/t/prune.t
+++ b/t/prune.t
@@ -9,7 +9,7 @@ use Test::XML;
 
 BEGIN {
     use_ok('HTML::TreeBuilder');
-    use_ok('HTML::Element::Prune');
+    use_ok('HTML::Element::Library');
 }
 
 
-- 
2.30.2