From 86b8b8823a7279a98db9da60821deaee13473376 Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.com>
Date: Fri, 26 Jun 2009 15:36:54 +0000
Subject: use any instead of grep (thanks perl_checker)

---
 draklive | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'draklive')

diff --git a/draklive b/draklive
index 52c8043..7d04ad0 100755
--- a/draklive
+++ b/draklive
@@ -498,7 +498,7 @@ sub remove_unneeded_bootlogo_locales {
     push @locales, 'en';
     my @kept_locales;
     foreach my $file (glob "*.tr") {
-        if (!grep { $file =~ /^$_\.tr$/ } @locales) {
+        if (!any { $file =~ /^$_\.tr$/ } @locales) {
             unlink $file;
         } else {
 	    my ($locale_name) = $file =~ /(.*)\.tr$/;
-- 
cgit v1.2.1