Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100755 33 lines (27 sloc) 0.769 kb
4630b49 merging 1.2 and bugfixes for auth and login : admin, members and reports...
tipaul authored
1 #!/usr/bin/perl
2
3 use strict;
4 use CGI;
5 use C4::Auth;
6 use C4::Output;
52a5fd4 Moved C4/Charset.pm to C4/Interface/CGI/Output.pm
acli authored
7 use C4::Interface::CGI::Output;
4630b49 merging 1.2 and bugfixes for auth and login : admin, members and reports...
tipaul authored
8 use C4::Database;
074853a Passing through the item types and branches to the template, so ppl can ...
rangi authored
9 use C4::Catalogue;
10 use C4::Biblio;
4630b49 merging 1.2 and bugfixes for auth and login : admin, members and reports...
tipaul authored
11 use HTML::Template;
12
13 my $query = new CGI;
5f3749d adding authentification with Auth.pm
tipaul authored
14 my ($template, $loggedinuser, $cookie)
15 = get_template_and_user({template_name => "catalogue/catalogue-home.tmpl",
16 query => $query,
17 type => "intranet",
18 authnotrequired => 0,
19 flagsrequired => {parameters => 1},
20 debug => 1,
21 });
4630b49 merging 1.2 and bugfixes for auth and login : admin, members and reports...
tipaul authored
22
074853a Passing through the item types and branches to the template, so ppl can ...
rangi authored
23 my ($branchcount,@branches)=branches();
24 my ($itemtypecount,@itemtypes)=getitemtypes();
25
26 my $classlist='';
547c0da *** empty log message ***
tipaul authored
27 $template->param(classlist => $classlist,
074853a Passing through the item types and branches to the template, so ppl can ...
rangi authored
28 type => 'intranet',
29 branches=>\@branches,
30 itemtypes=>\@itemtypes);
4630b49 merging 1.2 and bugfixes for auth and login : admin, members and reports...
tipaul authored
31
52a5fd4 Moved C4/Charset.pm to C4/Interface/CGI/Output.pm
acli authored
32 output_html_with_http_headers $query, $cookie, $template->output;
Something went wrong with that request. Please try again.