Mercurial > pub > Impl

comparison Lib/IMPL/Web/Application/ControllerUnit.pm @ 142:4c9849f0f879

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor changes
author wizard
date Wed, 07 Jul 2010 17:30:40 +0400
parents c5bc900eefd3
children b56ebc31bf18
comparison
equal deleted inserted replaced
141:7245c39e941e 142:4c9849f0f879
70 } elsif (ref $info eq 'HASH') { 70 } elsif (ref $info eq 'HASH') {
71 die new IMPL::Exception("A schema must be specified",$self,$method) unless $info->{schema}; 71 die new IMPL::Exception("A schema must be specified",$self,$method) unless $info->{schema};
72 72
73 $self->class_data(CONTROLLER_METHODS)->{$method} = { 73 $self->class_data(CONTROLLER_METHODS)->{$method} = {
74 wrapper => 'FormWrapper', 74 wrapper => 'FormWrapper',
75 schema => $info->{schema} 75 schema => $info->{schema},
76 form => $info->{form}
76 }; 77 };
77 } else { 78 } else {
78 die new IMPL::Exception("Unsupported method information",$self,$method); 79 die new IMPL::Exception("Unsupported method information",$self,$method);
79 } 80 }
80 } 81 }