projects
/
srvgit
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 2629 - Diacritics not being ignored when searching
[srvgit]
/
mainpage.pl
diff --git
a/mainpage.pl
b/mainpage.pl
index
e74890b
..
25ee475
100755
(executable)
--- a/
mainpage.pl
+++ b/
mainpage.pl
@@
-1,5
+1,8
@@
#!/usr/bin/perl
#!/usr/bin/perl
+# Copyright Paul Poulain 2002
+# Parts Copyright Liblime 2007
+#
# This file is part of Koha.
#
# Koha is free software; you can redistribute it and/or modify it under the
# This file is part of Koha.
#
# Koha is free software; you can redistribute it and/or modify it under the
@@
-17,11
+20,9
@@
#
use strict;
#
use strict;
-require Exporter;
-
-use C4::Output; # contains gettemplate
-use C4::Interface::CGI::Output;
+use warnings;
use CGI;
use CGI;
+use C4::Output;
use C4::Auth;
use C4::AuthoritiesMarc;
use C4::Koha;
use C4::Auth;
use C4::AuthoritiesMarc;
use C4::Koha;
@@
-30,8
+31,10
@@
my $query = new CGI;
my $authtypes = getauthtypes;
my @authtypesloop;
my $authtypes = getauthtypes;
my @authtypesloop;
-foreach my $thisauthtype ( sort { $authtypes->{$a} <=> $authtypes->{$b} }
- keys %$authtypes )
+foreach my $thisauthtype (
+ sort { $authtypes->{$a} <=> $authtypes->{$b} }
+ keys %$authtypes
+ )
{
my %row = (
value => $thisauthtype,
{
my %row = (
value => $thisauthtype,
@@
-47,29
+50,16
@@
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
type => "intranet",
authnotrequired => 0,
flagsrequired => {
type => "intranet",
authnotrequired => 0,
flagsrequired => {
- # catalogue => 1,
- # circulate => 1,
- # parameters => 1,
- # borrowers => 1,
- # permissions => 1,
- # reserveforothers => 1,
- # borrow => 1,
- # reserveforself => 1,
- # editcatalogue => 1,
- # updatecharges => 1,
+ catalogue => 1,
},
},
- debug => 1,
}
);
}
);
-my $marc_p = C4::Context->boolean_preference("marc");
-
$template->param(
$template->param(
- NOTMARC => !$marc_p,
authtypesloop => \@authtypesloop
);
authtypesloop => \@authtypesloop
);
-my $all_koha_news = &GetNewsToDisplay("koha");
+my $all_koha_news
= &GetNewsToDisplay("koha");
my $koha_news_count = scalar @$all_koha_news;
$template->param(
my $koha_news_count = scalar @$all_koha_news;
$template->param(