X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=mainpage.pl;h=f834985cfe577a66e1c6b585b9599a74b99870b8;hb=0d4acbba5c5db238eb42ed37dc9ba3dc2f36974b;hp=bd1c9e5ac8861192a6829597c02925ef19b9cb60;hpb=236747534115e35975de8d51554e6e87f4248462;p=koha.git diff --git a/mainpage.pl b/mainpage.pl index bd1c9e5ac8..f834985cfe 100755 --- a/mainpage.pl +++ b/mainpage.pl @@ -23,27 +23,12 @@ use warnings; 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 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( } ); -$template->param( - authtypesloop => \@authtypesloop -); - my $all_koha_news = &GetNewsToDisplay("koha"); my $koha_news_count = scalar @$all_koha_news;