From 9892c2940c447ae5ce53e52db3bd419391972274 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 8 Aug 2007 12:53:50 +0000 Subject: (clean_list) simplify --- control-center | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/control-center b/control-center index cac7bc5e..35e8c5bd 100755 --- a/control-center +++ b/control-center @@ -1221,7 +1221,7 @@ my $align2 = lang::text_direction_rtl() ? "right" : "left"; sub clean_list { my ($subtree) = @_; - my @subtree = grep { + grep { my $stuff = $_; my $exec = first(split /\s+/, $programs{$stuff}{binary}); my $is_present = -x $exec; -- cgit v1.2.1