if you must take a bot from another channel - pick the one which played least on it

diff --git a/misc/tools/midi2cfg-ng.pl b/misc/tools/midi2cfg-ng.pl
index 52dbd3a98636fb7f0d5fea2bc8a235b63e8884e0..00c826ff6827c6d5919da0075a8d375ff43a2fda 100755 (executable)
--- a/misc/tools/midi2cfg-ng.pl
+++ b/misc/tools/midi2cfg-ng.pl
@@ -548,7 +548,7 @@ sub botsort($$$$@)
                                else
                                {
                                        # better leave this one alone
-                                       --$q;
+                                       $q -= $_->{lastchannelsequence};
                                }
                        }
                        [$_, $q, rand]