add 'my' to newly moved Db opening code!
This commit is contained in:
parent
47514f6f28
commit
2b6e43b810
@ -139,8 +139,8 @@ sub do_update {
|
|||||||
# the value of trt will tell you which panel has returned
|
# the value of trt will tell you which panel has returned
|
||||||
my $trt = $c->param('trt') || '${firstPanel}'; #hidden control on every form.
|
my $trt = $c->param('trt') || '${firstPanel}'; #hidden control on every form.
|
||||||
my $ret = 'ok';
|
my $ret = 'ok';
|
||||||
#Validate the parameters in a custom sub one for each panel (although only one of these will be executed)
|
|
||||||
|
|
||||||
|
#Validate the parameters in a custom sub one for each panel (although only one of these will be executed)
|
||||||
my $thispanel;
|
my $thispanel;
|
||||||
<tal:block tal:repeat="panel panels">
|
<tal:block tal:repeat="panel panels">
|
||||||
if ($trt eq '${panel}'){
|
if ($trt eq '${panel}'){
|
||||||
@ -149,11 +149,11 @@ sub do_update {
|
|||||||
$thispanel = '${panel}';
|
$thispanel = '${panel}';
|
||||||
}
|
}
|
||||||
</tal:block>
|
</tal:block>
|
||||||
|
|
||||||
if ($ret ne "ok"){
|
if ($ret ne "ok"){
|
||||||
$c->do_display($thispanel);
|
$c->do_display($thispanel);
|
||||||
} else {
|
} else {
|
||||||
#Do whatever is needed, including writing values to the DB
|
#Do whatever is needed, including writing values to the DB
|
||||||
|
|
||||||
<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 ...
|
||||||
@ -162,8 +162,8 @@ sub do_update {
|
|||||||
# 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));
|
||||||
$c->stash(
|
$c->stash(
|
||||||
title => $title,
|
title => $title,
|
||||||
modul => $modul,
|
modul => $modul,
|
||||||
${prefix}_data => \%${prefix}_data
|
${prefix}_data => \%${prefix}_data
|
||||||
);
|
);
|
||||||
$c->render(template => "${lcPackageName}");
|
$c->render(template => "${lcPackageName}");
|
||||||
@ -181,7 +181,6 @@ sub do_update {
|
|||||||
$$${prefix}_data{'trt'} = '${NextPanel | "none"}';
|
$$${prefix}_data{'trt'} = '${NextPanel | "none"}';
|
||||||
}
|
}
|
||||||
$c->do_display($$${prefix}_data{'trt'});
|
$c->do_display($$${prefix}_data{'trt'});
|
||||||
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -1,4 +1,5 @@
|
|||||||
<root>
|
<root>
|
||||||
|
<!-- Todo - add password visibility to password type -->
|
||||||
<Select><![CDATA[
|
<Select><![CDATA[
|
||||||
<p><span class=label>
|
<p><span class=label>
|
||||||
%=l('${prefix}_${Label}')
|
%=l('${prefix}_${Label}')
|
||||||
|
@ -26,7 +26,7 @@
|
|||||||
</p>
|
</p>
|
||||||
|
|
||||||
%} elsif ($c->stash('success')) {
|
%} elsif ($c->stash('success')) {
|
||||||
<div class='sme-border'>
|
<div class='success '>
|
||||||
<h2><%=$c->l('Status Report') %></h2><p>
|
<h2><%=$c->l('Status Report') %></h2><p>
|
||||||
%= $c->l($c->stash('success'));
|
%= $c->l($c->stash('success'));
|
||||||
</p>
|
</p>
|
||||||
|
Loading…
Reference in New Issue
Block a user