projects
/
koha.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Finalized XML version for intranet
[koha.git]
/
tools
/
tools-home.pl
1
#!/usr/bin/perl
2
3
use strict;
4
use CGI;
5
use C4::Auth;
6
use C4::Interface::CGI::Output;
7
8
9
my $query = new CGI;
10
my ($template, $loggedinuser, $cookie)
11
= get_template_and_user({template_name => "tools/tools-home.tmpl",
12
query => $query,
13
type => "intranet",
14
authnotrequired => 0,
15
flagsrequired => {tools => 1},
16
debug => 1,
17
});
18
19
output_html_with_http_headers $query, $cookie, $template->output;