25 Jul
2013
25 Jul
'13
4:49 a.m.
http://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=10628 Srdjan Jankovic <srdjan@catalyst.net.nz> changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |srdjan@catalyst.net.nz --- Comment #4 from Srdjan Jankovic <srdjan@catalyst.net.nz> --- 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.