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

fixed: Unable to upload new file to update contents of file asset

Browse source
This commit is contained in:
Martin Kamerbeek 2007-05-02 10:06:22 +00:00
parent 47d6a95a7f
commit f17c5bc218
2 changed files with 11 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/WebGUI/Asset/File.pm
View file

@ -161,8 +161,9 @@ sub getEditForm {
}
$tabform->getTab("properties")->file(
-label=>$i18n->get('new file'),
-hoverHelp=>$i18n->get('new file description'),
-name => 'newFile',
-label => $i18n->get('new file'),
-hoverHelp => $i18n->get('new file description'),
);
return $tabform;
}
@ -245,13 +246,15 @@ sub processPropertiesFromFormPost {
my $self = shift;
$self->SUPER::processPropertiesFromFormPost;
delete $self->{_storageLocation};
my $fileStorageId = WebGUI::Form::File->new($self->session, {name => 'newFile'})->getValueFromPost;
my $storage = WebGUI::Storage->get($self->session, $fileStorageId);
my $fileStorageId = WebGUI::Form::File->new($self->session, {name => 'file'})->getValueFromPost;
my $storage = WebGUI::Storage->get($self->session, $fileStorageId);
if (defined $storage) {
$storage->setPrivileges($self->get('ownerUserId'), $self->get('groupIdView'), $self->get('groupIdEdit'));
my $filename = $storage->getFiles()->[0];
if (defined $filename && $filename ne $self->get("filename")) {
if (defined $filename) {
my %data;
$data{filename} = $filename;
$data{storageId} = $storage->getId;