fix CS posts not allowing new attachments after deleting old ones

This commit is contained in:
Graham Knop 2007-11-08 22:50:59 +00:00
parent 7f37c20028
commit 81bb746f9e
2 changed files with 4 additions and 1 deletions

View file

@ -243,7 +243,7 @@ sub toHtml {
my $i18n = WebGUI::International->new($self->session);
my $uploadControl = undef;
my $storage = $self->getStorageLocation;
my @files = $storage->getFiles if (defined $storage);
my @files = @{ $storage->getFiles } if (defined $storage);
my $maxFiles = $self->get('maxAttachments') - scalar(@files);
if ($maxFiles > 0) {
$self->session->style->setScript($self->session->url->extras('FileUploadControl.js'),{type=>"text/javascript"});