From: Sebastian Riedel <sri@labs.kraih.com>
Date: Wed, 13 Apr 2005 19:44:11 +0000 (+0000)
Subject: fixed helpers, maybe
X-Git-Tag: 5.7099_04~1549
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=195631f4eb6fe6091112178b0c422a9b78fa5631

fixed helpers, maybe
---

diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm
index 05aca39..2f3e2a7 100644
--- a/lib/Catalyst/Helper.pm
+++ b/lib/Catalyst/Helper.pm
@@ -455,7 +455,7 @@ plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD};
 
 all_pod_coverage_ok();
 
-__cgi_
+__cgi__
 [% startperl %] -w
 BEGIN { $ENV{CATALYST_ENGINE} = 'CGI' }
 
@@ -549,7 +549,7 @@ my $port = 3000;
 
 GetOptions( 'help|?' => \$help, 'port=s' => \$port );
 
-pod2usage(1) if \$help;
+pod2usage(1) if $help;
 
 [% name %]->run($port);