Fix unbalanced parenthesis in comptest.tt (RT#85661)

diff --git a/Changes b/Changes
index b5265ea..f9fee7c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -3,6 +3,7 @@ This file documents the revision history for Perl extension Catalyst-Devel.
         - Write =encoding utf8 into generated Pod files so that things
           work as expected for people with utf-8 characters in their unix
           username as returned by getpwuid (RT#84613)
+        - Fix unbalanced parenthesis in comptest.tt (RT#85661)
 
 1.38 2013-04-11 20:54:00
         - Remove all PAR based deployment options, as they're unsupported

diff --git a/share/t/comptest.tt b/share/t/comptest.tt
index cd40e00..296c043 100644 (file)
--- a/share/t/comptest.tt
+++ b/share/t/comptest.tt
@@ -8,7 +8,7 @@ unless (eval q{use Test::WWW::Mechanize::Catalyst 0.55; 1}) {
     exit 0;
 }
 
-ok( my $mech = Test::WWW::Mechanize::Catalyst->new(catalyst_app => '[% app %]', 'Created mech object' );
+ok( my $mech = Test::WWW::Mechanize::Catalyst->new(catalyst_app => '[% app %]'), 'Created mech object' );
 
 $mech->get_ok( 'http://localhost[% uri %]' );
 [%- ELSE %]