oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

first round of Perl::Critic cleanups. Do not use return undef, use a bare return instead

Browse source
This commit is contained in:
Colin Kuskie 2007-12-05 00:30:43 +00:00
parent 75041656ee
commit 96178fd70c
92 changed files with 209 additions and 209 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Form/File.pm
View file

@ -220,14 +220,14 @@ sub getValueFromPost {
my @files = @{ $storage->getFiles };
if (scalar(@files) < 1) {
$storage->delete;
return undef;
return;
} else {
my $id = $storage->getId;
$self->set("value", $id);
return $id;
}
}
return undef;
return;
}
#-------------------------------------------------------------------