httemplate/search/477partIV.html

   1 %if ( $cgi->param('_type') eq 'html' || $cgi->param('_type') eq 'html-print' ) {
   2 <H2>Part IV</H2>
   3 %} elsif ( $cgi->param('_type') eq 'xml' ) {
   4 <notes>
   5 %}
   6 <% $cgi->param('notes') |h %>
   7 %if ( $cgi->param('_type') eq 'xml' ) {
   8 </notes>
   9 %}
  10 <%init>
  11
  12 my $curuser = $FS::CurrentUser::CurrentUser;
  13
  14 die "access denied"
  15   unless $curuser->access_right('List packages');
  16
  17 </%init>