Changeset 1333 for trunk


Ignore:
Timestamp:
05/04/15 18:23:57 (9 years ago)
Author:
nanardon
Message:

Fix object creation after the jquery switch

Location:
trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Create.pm

    r1232 r1333  
    4444    } 
    4545    foreach my $attr (@{$info->{ask} || []}) { 
    46         my @vals = $c->req->param($form->attr_field_name($attr)); 
     46        my $field = $form->field($attr); 
     47        my @vals = $c->req->param($field->attr_field_name()); 
    4748        $info->{contents}{$attr} = @vals > 1 ? \@vals : $vals[0]; 
    4849    } 
     
    6162            LATMOS::Accounts::Log::lastmessage(LA_ERR); 
    6263        foreach my $attr (@{$info->{ask} || []}) { 
    63             $c->req->params->{$form->attr_field_name($attr)} = $info->{contents}{$attr}; 
     64            my $field = $form->field($attr); 
     65            $c->req->params->{$field->attr_field_name()} = $info->{contents}{$attr}; 
    6466        } 
    6567        $info->{step} = 0; # reset 
     
    6769    } else { 
    6870        foreach my $attr (@{$info->{ask} || []}) { 
    69             $c->req->params->{$form->attr_field_name($attr)} = $info->{contents}{$attr}; 
     71            my $field = $form->field($attr); 
     72            $c->req->params->{$field->attr_field_name()} = $info->{contents}{$attr}; 
    7073        } 
    7174    } 
  • trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Model/AttrForms.pm

    r1331 r1333  
    240240} 
    241241 
     242sub object { 
     243    my ($self) = @_; 
     244    $self->{object}; 
     245} 
     246 
    242247sub label { 
    243248    my ($self) = @_; 
     
    286291 
    287292    $self->{_attr}{$attr}->attr_field($type); 
     293} 
     294 
     295sub field { 
     296    my ($self, $attr, $type) = @_; 
     297 
     298    if (!$self->{_attr}{$attr}) { 
     299        $self->{_attr}{$attr} = $self->{c}->model('AttrFormsA', $attr, ($self->object 
     300                ? ($self->object) 
     301                : ($self->base, $self->otype))) 
     302            or die "Cannot get attribute $_"; 
     303    } 
     304 
     305    $self->{_attr}{$attr}; 
    288306} 
    289307 
Note: See TracChangeset for help on using the changeset viewer.