- Timestamp:
- 05/04/15 18:23:57 (9 years ago)
- 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 44 44 } 45 45 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()); 47 48 $info->{contents}{$attr} = @vals > 1 ? \@vals : $vals[0]; 48 49 } … … 61 62 LATMOS::Accounts::Log::lastmessage(LA_ERR); 62 63 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}; 64 66 } 65 67 $info->{step} = 0; # reset … … 67 69 } else { 68 70 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}; 70 73 } 71 74 } -
trunk/LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Model/AttrForms.pm
r1331 r1333 240 240 } 241 241 242 sub object { 243 my ($self) = @_; 244 $self->{object}; 245 } 246 242 247 sub label { 243 248 my ($self) = @_; … … 286 291 287 292 $self->{_attr}{$attr}->attr_field($type); 293 } 294 295 sub 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}; 288 306 } 289 307
Note: See TracChangeset
for help on using the changeset viewer.