http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=10628
Srdjan Jankovic <[email protected]> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |[email protected] --- Comment #4 from Srdjan Jankovic <[email protected]> --- my ($self) = grep( /$to/, @$from ); looks a bit inefficient. Would you consider replacing with my $self; foreach (@$from) { if ($_ eq $to) { $self = $to; last; } } or maybe even better List::MoreUtils::any() -- You are receiving this mail because: You are watching all bug changes. _______________________________________________ Koha-bugs mailing list [email protected] http://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-bugs website : http://www.koha-community.org/ git : http://git.koha-community.org/ bugs : http://bugs.koha-community.org/
