summaryrefslogtreecommitdiff
path: root/t/05-html-tree.t
diff options
context:
space:
mode:
Diffstat (limited to 't/05-html-tree.t')
-rw-r--r--t/05-html-tree.t6
1 files changed, 4 insertions, 2 deletions
diff --git a/t/05-html-tree.t b/t/05-html-tree.t
index c025251..eb990e8 100644
--- a/t/05-html-tree.t
+++ b/t/05-html-tree.t
@@ -1,9 +1,11 @@
#!perl
package HtmlTransform;{
- use Tree::Transform::XSLTish;
+ use Tree::Transform::XSLTish ':engine';
use strict;
use warnings;
+ engine_class 'XML::XPathEngine';
+
default_rules;
tree_rule match => 'img[@alt="pick"]', action => sub {
@@ -34,7 +36,7 @@ $tree->parse(<<'HTML');$tree->eof;
HTML
{
-my $trans=HtmlTransform->new(engine=>XML::XPathEngine->new());
+my $trans=HtmlTransform->new();
my @results=$trans->transform($tree);
is_deeply \@results,['this one'],'HTML example';
}