diff options
Diffstat (limited to 'httemplate/browse/part_virtual_field.cgi')
-rw-r--r-- | httemplate/browse/part_virtual_field.cgi | 26 |
1 files changed, 14 insertions, 12 deletions
diff --git a/httemplate/browse/part_virtual_field.cgi b/httemplate/browse/part_virtual_field.cgi index 5a1abe213..b18440036 100644 --- a/httemplate/browse/part_virtual_field.cgi +++ b/httemplate/browse/part_virtual_field.cgi @@ -1,13 +1,4 @@ -<% include("/elements/header.html",'Virtual field definitions', menubar('Main Menu' => $p)) %> - -%my %pvfs; -%my $block; -%my $p2 = popurl(2); -%my $dbtable; -% -%foreach (qsearch('part_virtual_field', {})) { -% push @{ $pvfs{$_->dbtable} }, $_; -%} +<% include('/elements/header.html', 'Virtual field definitions') %> <% include('/elements/error.html') %> @@ -32,9 +23,20 @@ </TABLE> % } -</BODY> -</HTML> +<% include('/elements/footer.html') %> + <%init> + die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); + +my %pvfs; +my $block; +my $p2 = popurl(2); +my $dbtable; + +foreach (qsearch('part_virtual_field', {})) { + push @{ $pvfs{$_->dbtable} }, $_; +} + </%init> |