Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Bug 6875 cleaning mainpage.pl

AutoritiesMarc is loaded for nothing : we don't display authorities anywhere,
so removing the dependancy as well as the useless code

Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
  • Loading branch information...
commit 056b5faa407df5ef30c56afb91b5a1801df478ae 1 parent 8165aee
@PaulPoulain PaulPoulain authored
Showing with 0 additions and 19 deletions.
  1. +0 −19 mainpage.pl
View
19 mainpage.pl
@@ -23,27 +23,12 @@
use CGI;
use C4::Output;
use C4::Auth;
-use C4::AuthoritiesMarc;
use C4::Koha;
use C4::NewsChannels;
use C4::Review qw/numberofreviews/;
use C4::Suggestions qw/CountSuggestion/;
use C4::Tags qw/get_count_by_tag_status/;
my $query = new CGI;
-my $authtypes = getauthtypes;
-my @authtypesloop;
-
-foreach my $thisauthtype (
- sort { $authtypes->{$a} <=> $authtypes->{$b} }
- keys %$authtypes
- )
-{
- my %row = (
- value => $thisauthtype,
- authtypetext => $authtypes->{$thisauthtype}{'authtypetext'},
- );
- push @authtypesloop, \%row;
-}
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
{
@@ -57,10 +42,6 @@
}
);
-$template->param(
- authtypesloop => \@authtypesloop
-);
-
my $all_koha_news = &GetNewsToDisplay("koha");
my $koha_news_count = scalar @$all_koha_news;
Please sign in to comment.
Something went wrong with that request. Please try again.