]>
iEval git - html-element-library.git/blob - t/highlander2.t
5 my ($branch, $age) = @_;
6 $branch->look_down(id
=> 'age')->replace_content($age);
11 my $tree = mktree
't/html/highlander2.html';
12 my $if_then = $tree->look_down(id
=> 'age_dialog')->highlander2(
30 local $_; # XML::Parser does not like read-only $_ (RT #101129)
31 isxml
($tree, "t/html/highlander2-$age.exp", "highlander2 for age $age");
34 test
$_ for qw(5 15 27);
This page took 0.042095 seconds and 4 git commands to generate.