summaryrefslogtreecommitdiff
path: root/httemplate/search/477partIV.html
blob: 269a925dcb371e91f8533b464f331b1274101729 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
%if ( $cgi->param('_type') eq 'html' || $cgi->param('_type') eq 'html-print' ) {
<H2>Part IV</H2>
%} elsif ( $cgi->param('_type') eq 'xml' ) {
<notes>
%}
<% $cgi->param('notes') |h %>
%if ( $cgi->param('_type') eq 'xml' ) {
</notes>
%}
<%init>

my $curuser = $FS::CurrentUser::CurrentUser;

die "access denied"
  unless $curuser->access_right('List packages');
  
</%init>