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

fix deleting entries in the DataForm

Browse source
This commit is contained in:
Colin Kuskie 2008-08-28 14:29:39 +00:00
parent 481fded7e7
commit 91b1c00215
2 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -448,8 +448,8 @@ sub deleteAttachedFiles {
my $fieldConfig = $self->getFieldConfig;
if ($entryId) {
my $entry = $self->session->db->buildArrayRef("select entryData from DataForm_entry where assetId=? and DataForm_entryId=?", [$self->getId, $entryId]);
$entryData = JSON::from_json($entry->{entryData});
my ($entry) = $self->session->db->buildArray("select entryData from DataForm_entry where assetId=? and DataForm_entryId=?", [$self->getId, $entryId]);
$entryData = JSON::from_json($entry);
}
if ($entryData) {
for my $field ( @$fields ) {