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

Account release candidate - final changes before merge

Browse source
This commit is contained in:
Frank Dillon 2008-11-15 02:39:23 +00:00
parent aec93573f0
commit 11d18075fa
45 changed files with 3379 additions and 1325 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -174,11 +174,6 @@ deleting the file if it was specified.
sub getValue {
my $self = shift;
my $value = $self->get("value");
my $log = $self->session->log;
$log->warn("file is: ".$self->session->form->get($self->get("name")."_file"));
$log->warn("value is: ".$value);
$log->warn("action is: ".$self->session->form->param($self->privateName('action')));
my $storage = WebGUI::Storage->get($self->session,$value);
if (defined $storage) {
foreach my $file (@{$storage->getFiles}) {
@ -200,8 +195,6 @@ sub getValue {
}
$storage->addFileFromFormPost($self->get("name")."_file",1000);
my @files = @{ $storage->getFiles };
$log->warn("storageId: ".$storage->getId);
$log->warn("number of files: ".scalar(@files));
if (scalar(@files) < 1) {
$storage->delete;
return undef;
@ -212,7 +205,6 @@ sub getValue {
return $id;
}
}
$log->warn("returning: ".$value);
return $value;
}