From 467b45c5d66d719e7e3701c066db566aba10c88b Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Wed, 28 Sep 2005 23:21:09 +0000
Subject: restore disambiguating {; (even if perl_checker doesn't support it)

---
 kernel/modules.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'kernel')

diff --git a/kernel/modules.pl b/kernel/modules.pl
index 26194a69e..afcc50549 100644
--- a/kernel/modules.pl
+++ b/kernel/modules.pl
@@ -130,7 +130,7 @@ sub remove_unneeded_modules {
 
     my @all = list_modules::all_modules();
     my @all_with_deps = map { dependencies_closure($_) } @all;
-    my %wanted_modules = map { "$_.$ext" => 1 } @all_with_deps;
+    my %wanted_modules = map {; return "$_.$ext" => 1 } @all_with_deps;
     foreach (all("all.kernels/$kern_ver/modules")) {
 	$wanted_modules{$_} or unlink "all.kernels/$kern_ver/modules/$_";	
     }
-- 
cgit v1.2.1