diff --git a/Koha/MoreUtils.pm b/Koha/MoreUtils.pm index 53d55e4c83..02751111ff 100644 --- a/Koha/MoreUtils.pm +++ b/Koha/MoreUtils.pm @@ -3,8 +3,7 @@ package Koha::MoreUtils; use Modern::Perl; # From List::MoreUtils v4.0 -sub singleton (@) -{ +sub singleton { my %seen = (); my $k; my $seen_undef;