[Rt-commit] r8243 - rtir/branches/2.3-EXPERIMENTAL/t

[ruz at bestpractical.com]

Author: ruz
Date: Fri Jul 20 18:59:34 2007
New Revision: 8243

Modified:
   rtir/branches/2.3-EXPERIMENTAL/t/000-mason-syntax.t

Log:
* in mason 1.36 comp_path is requred argument

Modified: rtir/branches/2.3-EXPERIMENTAL/t/000-mason-syntax.t
==============================================================================
--- rtir/branches/2.3-EXPERIMENTAL/t/000-mason-syntax.t	(original)
+++ rtir/branches/2.3-EXPERIMENTAL/t/000-mason-syntax.t	Fri Jul 20 18:59:34 2007
@@ -21,6 +21,7 @@
 }, 'html');
 ok($ok, "mason syntax is ok");
 
+use HTML::Mason;
 use HTML::Mason::Compiler;
 use HTML::Mason::Compiler::ToObject;
 
@@ -32,8 +33,10 @@
     close $fh or die "couldn't close '$file': $!";
 
     my $compiler = new HTML::Mason::Compiler::ToObject;
-    $compiler->compile( comp_source => $text, name => 'my',
-   # comp_path => 'my' 
+    $compiler->compile(
+        comp_source => $text,
+        name => 'my',
+        $HTML::Mason::VERSION >= 1.36? (comp_path => 'my'): (),
     );
     return 1;
 }