summaryrefslogtreecommitdiff
path: root/rt/lib/t/regression/00-mason-syntax.t
diff options
context:
space:
mode:
authorivan <ivan>2008-03-02 04:11:51 +0000
committerivan <ivan>2008-03-02 04:11:51 +0000
commit8103c1fc1b2c27a6855feadf26f91b980a54bc52 (patch)
tree631dd45606c37c00d9026e14ecc3ee3700b4b51c /rt/lib/t/regression/00-mason-syntax.t
parent9c68254528b6f2c7d8c1921b452fa56064783782 (diff)
import rt 3.6.6
Diffstat (limited to 'rt/lib/t/regression/00-mason-syntax.t')
-rw-r--r--rt/lib/t/regression/00-mason-syntax.t7
1 files changed, 6 insertions, 1 deletions
diff --git a/rt/lib/t/regression/00-mason-syntax.t b/rt/lib/t/regression/00-mason-syntax.t
index 96674cacf..a94c7efc1 100644
--- a/rt/lib/t/regression/00-mason-syntax.t
+++ b/rt/lib/t/regression/00-mason-syntax.t
@@ -25,6 +25,7 @@ find( {
}, 'html');
ok($ok, "mason syntax is ok");
+use HTML::Mason;
use HTML::Mason::Compiler;
use HTML::Mason::Compiler::ToObject;
@@ -36,7 +37,11 @@ sub compile_file {
close $fh or die "couldn't close '$file': $!";
my $compiler = new HTML::Mason::Compiler::ToObject;
- $compiler->compile( comp_source => $text, name => 'my' );
+ $compiler->compile(
+ comp_source => $text,
+ name => 'my',
+ $HTML::Mason::VERSION >= 1.36? (comp_path => 'my'): (),
+ );
return 1;
}