a couple bug fixes

This commit is contained in:
JT Smith 2008-08-15 01:02:08 +00:00
parent fe45029a3a
commit 1f3dbbaca0
2 changed files with 27 additions and 26 deletions

View file

@ -175,9 +175,11 @@ sub getValue {
my $self = shift;
my $value = $self->get("value");
my $storage = WebGUI::Storage->get($self->session,$value);
foreach my $file (@{$storage->getFiles}) {
if ($self->session->form->param($self->privateName('delete_'.$file))) {
$storage->deleteFile($file);
if (defined $storage) {
foreach my $file (@{$storage->getFiles}) {
if ($self->session->form->param($self->privateName('delete_'.$file))) {
$storage->deleteFile($file);
}
}
}
if ($self->session->form->param($self->privateName('action')) eq 'keep') {