Permalink
Browse files

Address warning when param_fetch is called with no args.

  • Loading branch information...
1 parent 6dcdec8 commit fbd5098e27988c2f10a3cdd115f445c31c195a46 @markstos committed Dec 8, 2010
Showing with 3 additions and 0 deletions.
  1. +1 −0 Changes
  2. +2 −0 lib/CGI.pm
View
@@ -14,6 +14,7 @@
[INTERNALS]
- Re-fixing https test in http.t. (RT#54768, thanks to SPROUT)
+ - param_fetch no longer triggers a warning when called with no arguments (ysth, Mark Stosberg)
Version 3.50
View
@@ -2957,6 +2957,8 @@ END_OF_FUNC
sub param_fetch {
my($self,@p) = self_or_default(@_);
my($name) = rearrange([NAME],@p);
+ return [] unless defined $name;
+
unless (exists($self->{param}{$name})) {
$self->add_parameter($name);
$self->{param}{$name} = [];

0 comments on commit fbd5098

Please sign in to comment.