diff options
| author | ivan <ivan> | 2011-02-27 00:52:29 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2011-02-27 00:52:29 +0000 |
| commit | f4f7bb4086cdaf2699c6d028b76e99b3e9be1e90 (patch) | |
| tree | ea1d3ad4c176a286f71758b524aee18b4aa722c1 /httemplate/browse | |
| parent | 8cec20dd7f69a3fb7b6a5e6a853747833e8a7784 (diff) | |
torrus virtual ports, RT#10574
Diffstat (limited to 'httemplate/browse')
| -rw-r--r-- | httemplate/browse/torrus_srvderive.html | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/httemplate/browse/torrus_srvderive.html b/httemplate/browse/torrus_srvderive.html new file mode 100644 index 000000000..92cbb6928 --- /dev/null +++ b/httemplate/browse/torrus_srvderive.html @@ -0,0 +1,26 @@ +<% include( 'elements/browse.html', + 'title' => 'Virtual network ports', + 'name_singular' => 'port', + 'menubar' => [ 'Add a new virtual port' => + $p.'edit/torrus_srvderive.html', + ], + 'query' => { 'table' => 'torrus_srvderive' }, + 'count_query' => 'SELECT COUNT(*) FROM torrus_srvderive', + 'header' => [ 'Virtual Port', 'Components', ], + 'fields' => [ 'serviceid', $components_sub, ], + 'links' => [ $link, '', ], + ) +%> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + +my $link = [ $p.'edit/torrus_srvderive.html?', 'derivenum' ]; + +my $components_sub = sub { + my $torrus_srvderive = shift; + join('<BR>', $torrus_srvderive->component_serviceids); +}; + +</%init> |