Bug 27136: (QA follow-up) Fix entries for multiple und undetermined language(s)
[koha-ffzg.git] / clubs / clubs.pl
index ca382ce..ce2053e 100755 (executable)
@@ -21,13 +21,13 @@ use Modern::Perl;
 
 use CGI;
 
-use C4::Auth;
-use C4::Output;
+use C4::Auth qw( get_template_and_user );
+use C4::Output qw( output_html_with_http_headers );
 
 use Koha::Clubs;
 use Koha::Club::Templates;
 
-my $cgi = new CGI;
+my $cgi = CGI->new;
 
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
@@ -45,15 +45,12 @@ my $club_id = $cgi->param('club_id');
 my $club_template = $club_template_id ? Koha::Club::Templates->find( $club_template_id ) : undef;
 my $club = $club_id ? Koha::Clubs->find( $club_id ) : undef;
 
-my @club_templates = Koha::Club::Templates->search();
-my @clubs          = Koha::Clubs->search();
-
 $template->param(
     stored         => $stored,
     club_template  => $club_template,
     club           => $club,
-    club_templates => \@club_templates,
-    clubs          => \@clubs,
+    club_templates => Koha::Club::Templates->search,
+    clubs          => Koha::Clubs->search,
 );
 
 output_html_with_http_headers( $cgi, $cookie, $template->output );