In Controller call sub through
This commit is contained in:
parent
822fe8d26f
commit
1b41987aa7
@ -143,7 +143,7 @@ sub do_update {
|
|||||||
<tal:block tal:repeat="panel panels">
|
<tal:block tal:repeat="panel panels">
|
||||||
if ($trt eq '${panel}'){
|
if ($trt eq '${panel}'){
|
||||||
#Validate form parameters for panel ${panel}
|
#Validate form parameters for panel ${panel}
|
||||||
$ret = validate_${panel}($c,\%${prefix}_data);
|
$ret = $c->validate_${panel}(\%${prefix}_data);
|
||||||
$thispanel = '${panel}';
|
$thispanel = '${panel}';
|
||||||
}
|
}
|
||||||
</tal:block>
|
</tal:block>
|
||||||
@ -157,7 +157,7 @@ sub do_update {
|
|||||||
<tal:block tal:repeat="panel panels">
|
<tal:block tal:repeat="panel panels">
|
||||||
if ($trt eq '${panel}'){
|
if ($trt eq '${panel}'){
|
||||||
#do whatever is required ...
|
#do whatever is required ...
|
||||||
$ret = perform_${panel}($c,\%${prefix}_data);
|
$ret = $c->perform_${panel}(\%${prefix}_data);
|
||||||
if ($ret ne "ok") {
|
if ($ret ne "ok") {
|
||||||
# return to the panel with error message
|
# return to the panel with error message
|
||||||
$c->stash(error => $c->l($ret));
|
$c->stash(error => $c->l($ret));
|
||||||
|
Loading…
Reference in New Issue
Block a user