Ignore the cross-* experimental packages.

diff --git a/status.pl b/status.pl
index a8e5810..e68fb5e 100755 (executable)
--- a/status.pl
+++ b/status.pl
@@ -68,8 +68,12 @@ my %ignore_pending = ();
 open IGNORE, "IGNORE" or die "IGNORE: $!\n";
 while (<IGNORE>) {
     next if /^\#/ || /^$/;
 open IGNORE, "IGNORE" or die "IGNORE: $!\n";
 while (<IGNORE>) {
     next if /^\#/ || /^$/;

-    m/(.*)/; # untaint
-    $ignore_pending{"mingw32-$1"} = 1;
+    if (/^cross-(.*)/) {
+       $ignore_pending{"mingw32-$1"} = 1;
+    } else {
+       m/(.*)/; # untaint
+       $ignore_pending{"mingw32-$1"} = 1;
+    }

 }
 close IGNORE;
 
 }
 close IGNORE;