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
commitc648976f0b7975f2328ebd7ba8c711fad0ca4195 (patch)
treef3d176ec300a46c253ba25a988b897bce02fe174 /rt/lib/t/regression/00-mason-syntax.t
parent5e05724a635a22776f1b973f5d7e77989da4e048 (diff)
parent8103c1fc1b2c27a6855feadf26f91b980a54bc52 (diff)
This commit was generated by cvs2svn to compensate for changes in r6255,
which included commits to RCS files with non-trunk default branches.
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;
}