From: Sebastian Riedel <sri@labs.kraih.com>
Date: Sat, 19 Nov 2005 22:21:44 +0000 (+0000)
Subject: Fixed Catalyst::Utils::request
X-Git-Tag: 5.7099_04~858
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=a88c7ec8a3a92fdf966dce0026d06082a10c7714

Fixed Catalyst::Utils::request
---

diff --git a/lib/Catalyst/Utils.pm b/lib/Catalyst/Utils.pm
index b3b75bb..3a0974b 100644
--- a/lib/Catalyst/Utils.pm
+++ b/lib/Catalyst/Utils.pm
@@ -197,7 +197,7 @@ Returns an L<HTTP::Request> object for a uri.
 sub request {
     my $request = shift;
     unless ( ref $request ) {
-        if ( $request =~ m/http/i ) {
+        if ( $request =~ m/^http/i ) {
             $request = URI->new($request)->canonical;
         }
         else {