projects
/
catagits/Catalyst-Runtime.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Updated makefile
[catagits/Catalyst-Runtime.git]
/
lib
/
Catalyst
/
Utils.pm
diff --git
a/lib/Catalyst/Utils.pm
b/lib/Catalyst/Utils.pm
index
b3b75bb
..
3a0974b
100644
(file)
--- 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 {