[Catalyst-commits] r13316 - in HTTP-Request-AsCGI/trunk: .
lib/HTTP/Request
rafl at dev.catalyst.perl.org
rafl at dev.catalyst.perl.org
Thu May 27 03:14:43 GMT 2010
Author: rafl
Date: 2010-05-27 04:14:43 +0100 (Thu, 27 May 2010)
New Revision: 13316
Modified:
HTTP-Request-AsCGI/trunk/dist.ini
HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm
Log:
Adapt to latest dzil
Modified: HTTP-Request-AsCGI/trunk/dist.ini
===================================================================
--- HTTP-Request-AsCGI/trunk/dist.ini 2010-05-24 22:15:13 UTC (rev 13315)
+++ HTTP-Request-AsCGI/trunk/dist.ini 2010-05-27 03:14:43 UTC (rev 13316)
@@ -14,9 +14,8 @@
Test::More = 0
URI::Escape = 0
-[@Classic]
-
-[PodPurler]
-
-[MetaResources]
+[@FLORA]
+dist = HTTP-Request-AsCGI
repository = http://dev.catalyst.perl.org/repos/Catalyst/HTTP-Request-AsCGI
+repository_web = http://dev.catalystframework.org/svnweb/Catalyst/browse/HTTP-Request-AsCGI
+repository_type = svn
Modified: HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm
===================================================================
--- HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm 2010-05-24 22:15:13 UTC (rev 13315)
+++ HTTP-Request-AsCGI/trunk/lib/HTTP/Request/AsCGI.pm 2010-05-27 03:14:43 UTC (rev 13316)
@@ -15,6 +15,7 @@
__PACKAGE__->mk_accessors(qw[ environment request stdin stdout stderr ]);
# old typo
+
=begin Pod::Coverage
enviroment
@@ -67,7 +68,7 @@
SERVER_NAME => $uri->host,
SERVER_PORT => $uri->port,
SERVER_PROTOCOL => $request->protocol || 'HTTP/1.1',
- SERVER_SOFTWARE => "HTTP-Request-AsCGI/$VERSION",
+ SERVER_SOFTWARE => 'HTTP-Request-AsCGI/' . our $VERSION,
REMOTE_ADDR => '127.0.0.1',
REMOTE_HOST => 'localhost',
REMOTE_PORT => int( rand(64000) + 1000 ), # not in RFC 3875
More information about the Catalyst-commits
mailing list