midichannels.pl: support indented commands

diff --git a/misc/tools/midichannels.pl b/misc/tools/midichannels.pl
index 4f47b9fdc521165157f239280b3cbaadec54ed02..0223e82a3a5c39ac0046d98706746e47fefbc45c 100755 (executable)
--- a/misc/tools/midichannels.pl
+++ b/misc/tools/midichannels.pl
@@ -60,7 +60,7 @@ for(@others)
 while(<STDIN>)
 {
        chomp;
-       my @arg = split /\s+/, $_;
+       my @arg = grep { $_ ne '' } split /\s+/, $_;
        my $cmd = shift @arg;
        print "Executing: $cmd @arg\n";
        if($cmd eq '#')