From: David Kamholz <dkamholz@cpan.org>
Date: Fri, 7 Jul 2006 20:03:33 +0000 (+0000)
Subject: fix warning message annoyance with FastCGI engine
X-Git-Tag: 5.7099_04~395
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=5db46287d60238834e7488a6e856b51fc761f695

fix warning message annoyance with FastCGI engine
---

diff --git a/Changes b/Changes
index cb93fba..e322157 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,7 @@
 This file documents the revision history for Perl extension Catalyst.
 
 5.7000   2006-07-07 08:08:08
+        - fix FCGI.pm warning message with FastCGI engine
         - bumped inc::Module::Install to 0.63 in Makefile.PL
         - fixes to uri_for_action for DispatchType::Chained
 	- Further doc work.
diff --git a/lib/Catalyst/Engine/FastCGI.pm b/lib/Catalyst/Engine/FastCGI.pm
index f71049c..ba182d3 100644
--- a/lib/Catalyst/Engine/FastCGI.pm
+++ b/lib/Catalyst/Engine/FastCGI.pm
@@ -45,7 +45,7 @@ Options may also be specified;
 sub run {
     my ( $self, $class, $listen, $options ) = @_;
 
-    my $sock;
+    my $sock = 0;
     if ($listen) {
         my $old_umask = umask;
         unless ( $options->{leave_umask} ) {