Fix a hash lookup into a C::IO object in the DataForm, which isn't a hash.

This commit is contained in:
Colin Kuskie 2009-02-18 23:58:05 +00:00
parent 8b7db9ff38
commit 021215c9bd
2 changed files with 4 additions and 3 deletions

View file

@ -1,4 +1,5 @@
7.6.13
- fixed #9760: DataForm not working in demo.plainblack.com
7.6.12
- fixed: During postback on a recurring transaction, the routine could error out instead of catching an error.

View file

@ -512,7 +512,7 @@ sub getAttachedFiles {
my $fieldConfig = $self->getFieldConfig;
my @paths;
for my $field ( values %{$fieldConfig} ) {
my $form = $self->_createForm($field, $entryData->{$field->{name}});
my $form = $self->_createForm($field, $entryData->field($field->{name}));
if ($form->can('getStorageLocation')) {
my $storage = $form->getStorageLocation;
if ($storage) {
@ -1521,8 +1521,8 @@ sub www_process {
unless $self->canView;
my $session = $self->session;
my $i18n = WebGUI::International->new($session,"Asset_DataForm");
my $entryId = $self->session->form->process('entryId');
my $entry = $self->entryClass->new($self, ( $entryId ? $entryId : () ) );
my $entryId = $session->form->process('entryId');
my $entry = $self->entryClass->new($self, ( $entryId ? $entryId : () ) );
my $var = $self->getTemplateVars;