From 1f209978748193ac5bd6f72403b6e9d124277146 Mon Sep 17 00:00:00 2001
From: Chris Williams <chris@bingosnet.co.uk>
Date: Wed, 20 Feb 2008 10:18:36 -0500
Subject: [PATCH] Patch from agaran to fix a problem with his original patch to
 Filter-HTTPD. Adjusted so the tests pass.

---
 lib/POE/Filter/HTTPD.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lib/POE/Filter/HTTPD.pm b/lib/POE/Filter/HTTPD.pm
index 9c229ea39..59f10f47c 100644
--- a/lib/POE/Filter/HTTPD.pm
+++ b/lib/POE/Filter/HTTPD.pm
@@ -209,8 +209,7 @@ sub get {
 
   # If this is a GET or HEAD request, we won't be expecting a message
   # body.  Finish up.
-
-  my $method = uc $r->method();
+  $method = uc $r->method();
   if ($method eq 'GET' or $method eq 'HEAD') {
     $self->[FINISH]++;
     # We are sending this back, so won't need it anymore.