X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=mainpage.pl;h=25ee4754b1094c2215da61238e7f6251a54d847d;hb=a43974029205fb830eef8989b8a5899d0561840d;hp=fa5e8143ea42c41bca8c7c2146ea83504957e9ad;hpb=3bf4859a8b4e867b5c0d0c2e10471c8ecbb2014e;p=koha.git diff --git a/mainpage.pl b/mainpage.pl index fa5e8143ea..25ee4754b1 100755 --- a/mainpage.pl +++ b/mainpage.pl @@ -1,5 +1,8 @@ #!/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 @@ -17,8 +20,7 @@ # use strict; -require Exporter; - +use warnings; use CGI; use C4::Output; use C4::Auth; @@ -53,10 +55,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( } ); -my $marc_p = C4::Context->boolean_preference("marc"); - $template->param( - NOTMARC => !$marc_p, authtypesloop => \@authtypesloop );