diff options
author | dakkar <dakkar@sardina.(none)> | 2009-04-30 21:50:05 +0200 |
---|---|---|
committer | dakkar <dakkar@sardina.(none)> | 2009-04-30 21:50:05 +0200 |
commit | a2ad1449e5f0fa52c03c486966131b5528f2a04a (patch) | |
tree | 37037ff63bc337e374481c6033e07b022c1ffec6 /t/02-inherit.t | |
parent | added a prerq I had forgotten (diff) | |
parent | better perl version requirements (diff) | |
download | Tree-Transform-XSLTish-a2ad1449e5f0fa52c03c486966131b5528f2a04a.tar.gz Tree-Transform-XSLTish-a2ad1449e5f0fa52c03c486966131b5528f2a04a.tar.bz2 Tree-Transform-XSLTish-a2ad1449e5f0fa52c03c486966131b5528f2a04a.zip |
Merge branch 'master' of git@luxion:Tree-Transform-XSLTish
Conflicts:
Makefile.PL
Diffstat (limited to 't/02-inherit.t')
-rw-r--r-- | t/02-inherit.t | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/t/02-inherit.t b/t/02-inherit.t index fb8e238..e882b53 100644 --- a/t/02-inherit.t +++ b/t/02-inherit.t @@ -1,8 +1,15 @@ #!perl package TransformA;{ - use Tree::Transform::XSLTish; + use Tree::Transform::XSLTish ':engine'; use strict; use warnings; + use Tree::XPathEngine; + use Test::Most; + + engine_factory { + ok 1,'custom factory called'; + Tree::XPathEngine->new(); + }; default_rules; @@ -29,14 +36,11 @@ package TransformB;{ } package main; -use Test::Most qw(no_plan die); +use Test::Most tests=>2,'die'; use strict; use warnings; use Tree::DAG_Node::XPath; -sub Tree::DAG_Node::XPath::Root::xpath_get_root_node { return $_[0] } -sub Tree::DAG_Node::XPath::Root::xpath_get_parent_node { return } - my $tree=Tree::DAG_Node::XPath->new(); $tree->name('base'); $tree->new_daughter->name("coso$_") for 1..5; |