corrected DataForm upgrade script
This commit is contained in:
parent
deaa6c65c0
commit
f7962810db
2 changed files with 10 additions and 1 deletions
|
|
@ -150,7 +150,7 @@ sub convertDataForm {
|
|||
my $newEntryFieldData = {};
|
||||
my $entryFields = $session->db->read("SELECT * FROM `DataForm_entryData` WHERE assetId=? AND DataForm_entryId=?", [$assetId, $entryData->{DataForm_entryId}]);
|
||||
while (my $entryFieldData = $entryFields->hashRef) {
|
||||
$newEntryFieldData->{ $fieldMapping{ $entryFieldData->{DataForm_fieldId} } } = $entryData->{value};
|
||||
$newEntryFieldData->{ $fieldMapping{ $entryFieldData->{DataForm_fieldId} } } = $entryFieldData->{value};
|
||||
}
|
||||
$entryFields->finish;
|
||||
my $entryJSON = encode_json($newEntryFieldData);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue