projects
/
catagits/Catalyst-Runtime.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
fixed small bug
[catagits/Catalyst-Runtime.git]
/
lib
/
Catalyst
/
Engine
/
CGI.pm
diff --git
a/lib/Catalyst/Engine/CGI.pm
b/lib/Catalyst/Engine/CGI.pm
index
1a9d04a
..
1588717
100644
(file)
--- a/
lib/Catalyst/Engine/CGI.pm
+++ b/
lib/Catalyst/Engine/CGI.pm
@@
-187,6
+187,7
@@
sub prepare_request { shift->cgi( CGI::Simple->new ) }
sub prepare_uploads {
my $c = shift;
for my $name ( $c->cgi->upload ) {
+ next unless defined $name;
$c->req->uploads->{$name} = {
fh => $c->cgi->upload($name),
size => $c->cgi->upload_info( $name, 'size' ),