projects
/
catagits/Catalyst-Runtime.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
add warning in uri_for for undefined args
[catagits/Catalyst-Runtime.git]
/
lib
/
Catalyst.pm
diff --git
a/lib/Catalyst.pm
b/lib/Catalyst.pm
index
e20a2cf
..
284f114
100644
(file)
--- a/
lib/Catalyst.pm
+++ b/
lib/Catalyst.pm
@@
-931,6
+931,7
@@
sub uri_for {
my $params =
( scalar @args && ref $args[$#args] eq 'HASH' ? pop @args : {} );
+ carp "uri_for called with undef argument" if grep { ! defined $_ } @args;
s/([^$URI::uric])/$URI::Escape::escapes{$1}/go for @args;
unshift(@args, $path);