From c6bbe01f3eb77df74e6fa64249cb2ee65c25c843 Mon Sep 17 00:00:00 2001
From: "roberto@sirius" <roberto@sirius>
Date: Thu, 15 Apr 2010 12:59:24 +0200
Subject: [PATCH] fix for Plack handler

---
 contrib/Uwsgi.pm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/contrib/Uwsgi.pm b/contrib/Uwsgi.pm
index 31b0466e..f4bdecd2 100644
--- a/contrib/Uwsgi.pm
+++ b/contrib/Uwsgi.pm
@@ -19,9 +19,8 @@ sub run {
 
     my $server ;
 
-
-    if ($ENV{'UWSGI_FD'}) {
-	$server = IO::Socket::UNIX->new_from_fd($ENV{'UWSGI_FD'});
+    if (exists($ENV{'UWSGI_FD'})) {
+	$server = IO::Socket::UNIX->new_from_fd($ENV{'UWSGI_FD'}, '+<');
     }
     else {	
         $server = IO::Socket::INET->new(LocalPort => $self->{port}, LocalAddr => $self->{host}, Listen => 100, ReuseAddr => 1);