brianr/SM2Gen
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add use esmith::util::network into controler files

Browse Source
This commit is contained in:
Brian Read
2024-11-15 17:28:13 +00:00
parent c00230a998
commit 5205daf7ed
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
Templates/controller.pm.tem
View File

@@ -35,6 +35,7 @@ use SrvMngr qw(theme_list init_session);
use Data::Dumper; use Data::Dumper;
use esmith::util; use esmith::util;
use esmith::util::network ;
use esmith::ConfigDB; use esmith::ConfigDB;
use esmith::AccountsDB; use esmith::AccountsDB;
use esmith::NetworksDB; use esmith::NetworksDB;

5
Templates/custom.pm.tem
View File

@@ -6,6 +6,7 @@
# and provison of the control data for table(s) # and provison of the control data for table(s)
# #
use esmith::util; use esmith::util;
use esmith::util::network;
use esmith::ConfigDB; use esmith::ConfigDB;
use esmith::HostsDB; use esmith::HostsDB;
use esmith::AccountsDB; use esmith::AccountsDB;
@@ -61,12 +62,10 @@ our $ddb = esmith::DomainsDB->open() || die("Couldn't open Domains db");
<tal:block repeat="tablecontrol tablecontrols"> <tal:block repeat="tablecontrol tablecontrols">
sub get_${tablecontrol[0]} { sub get_${tablecontrol[0]} {
# Return an array of hashes of the contents for each row and column for ${tablecontrol[0]} # Return an array of hashes of the contents for each row and column for ${tablecontrol[0]}
# default is a single row of strings "col1header-1, col2header-1, col3Header-1 etc" # Cols/fields in hash needed are:
# Cols needed are:
# <tal:block repeat="col tablecontrol[1]['columns']">${col}<tal:condition condition="not: repeat['col'].end">, # <tal:block repeat="col tablecontrol[1]['columns']">${col}<tal:condition condition="not: repeat['col'].end">,
# </tal:condition></tal:block> # </tal:condition></tal:block>
my $c = shift; my $c = shift;
my $control_data = $c->stash('${tablecontrol[0]}');
my @ret = {}; my @ret = {};