for error managing in .htaccess
[koha.git] / koha-tmpl / errors / 402.pl
1 #!/usr/bin/perl
2
3 use strict;
4 use CGI;
5 use C4::Auth;
6 use C4::Output;
7 use C4::Interface::CGI::Output;
8 use C4::Context;
9 use HTML::Template;
10
11 my $query = new CGI;
12 my ($template, $loggedinuser, $cookie)
13 = get_template_and_user({template_name => "errors/402.tmpl",
14                                 query => $query,
15                                 type => "intranet",
16                                 authnotrequired => 0,
17                                 flagsrequired => {catalogue => 1},
18                                 debug => 1,
19                                 });
20 output_html_with_http_headers $query, $cookie, $template->output;