diff --git a/root/usr/share/smanager/themes/AdminLTE/templates/partials/_ln_add.html.ep b/root/usr/share/smanager/themes/AdminLTE/templates/partials/_ln_add.html.ep index a0f03a2..d05575e 100644 --- a/root/usr/share/smanager/themes/AdminLTE/templates/partials/_ln_add.html.ep +++ b/root/usr/share/smanager/themes/AdminLTE/templates/partials/_ln_add.html.ep @@ -1,32 +1,35 @@
- % my $retref= $c->stash("ret"); - % my %ret; - % unless (length($retref)) {%ret = (ret=>"");} - % else {%ret = %$retref;} + % my $retref = $c->stash("ret"); + % my %ret = $retref ? %$retref : (ret => ""); + % my @vars = split(/,/, $ret{vars} // ''); + % my ($var1, $var2, $var3, $var4, $var5, $var6, $var7) = @vars; - % my @vars = split(",",$ret{vars}); - % my $var1 = @vars[0]; - % my $var2 = @vars[1]; - % my $var3 = @vars[2]; - % my $var4 = @vars[3]; - % my $var5 = @vars[4]; - % my $var6 = @vars[5]; + % if ($c->app->config->{debug}) { +
+
+            <%= dumper { ret_data => \%ret } %>
+        
+ % } - %if ($ret{'ret'} eq "") { + % if ($ret{ret} eq "") { +
+ <%= l "ln_FIRSTPAGE_DESC" %> +
+ % } elsif (index($ret{ret},"SUCCESS") != -1) { +
+

Operation Status Report

+ <%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> +
+ % } else { +
+

Operation Status Report - Error

+ <%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> +
+ % } + +
- %} elsif (index($ret{ret},"SUCCESS") != -1) { -
-

Operation Status Report

- <%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> -
- %} else { -
-

Operation Status Report - Error

- <%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> -
- %} -
% my $btn = l('ADD'); % my $network_db = esmith::NetworksDB::UTF8->open() || die "Couldn't open NetworksDB db"; @@ -37,7 +40,6 @@
% } -

<%=l "ln_ADD_TITLE" %>

@@ -54,7 +56,7 @@
- +
@@ -65,7 +67,7 @@
- +
@@ -76,7 +78,7 @@
- +