[Catalyst-commits] r9195 - Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2009-02-04 15:16:33 +0000 (Wed, 04 Feb 2009)
New Revision: 9195

Modified:
   Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm
Log:
Use the way documented by IO::Socket::INET to get the error message after trying to create a listening socket.

Closes RT#41828.

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm	2009-02-04 15:04:37 UTC (rev 9194)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm	2009-02-04 15:16:33 UTC (rev 9195)
@@ -216,7 +216,7 @@
         ReuseAddr => 1,
         Type      => SOCK_STREAM,
       )
-      or die "Couldn't create daemon: $!";
+      or die "Couldn't create daemon: $@";
 
     $port = $daemon->sockport();