ensure left icons do are added on mandrake move

1 files changed, 5 insertions, 1 deletions

diff --git a/control-center b/control-center
index 18b7db09..a6e5c45c 100755
--- a/control-center
+++ b/control-center
@@ -457,7 +457,11 @@ foreach (@tree) {
     foreach my $stuff (@$subtree) {
         my $exec = first(split /\s+/, $exec_hash->{$stuff->[0]}[1]);
         # do not complain about missing entries in move:
-        -x $exec ? push(@subtree, $stuff) : warn qq("$exec" is not executable) if $mdk_rel !~ /Move/;
+        if (-x $exec) {
+            push @subtree, $stuff;
+        } else {
+            warn qq("$exec" is not executable) if $mdk_rel !~ /Move/;
+        }
     }
     next if !@subtree;