Reject non-option args to u-d-mi

[ypp-sc-tools.db-test.git] / yarrg / update-master-info

diff --git a/yarrg/update-master-info b/yarrg/update-master-info
index 1dd432ff895584365fbc7c2aebfbe05193466562..00aee34b890767cf308ec43c226128caefce701b 100755 (executable)
--- a/yarrg/update-master-info
+++ b/yarrg/update-master-info
@@ -75,6 +75,7 @@ while (@ARGV && $ARGV[0] =~ m/^-/) {
        else { die "$_ ?"; }
     }
 }
+die if @ARGV;
 
 die if @specoceans && $alloceans;