+ don't check first argument (connector compat)
This commit is contained in:
parent
d96d2035fb
commit
31337265d8
|
@ -89,7 +89,7 @@ sub GetOptions {
|
||||||
splice @ARGV, $i, 1;
|
splice @ARGV, $i, 1;
|
||||||
$num_args--;
|
$num_args--;
|
||||||
} else {
|
} else {
|
||||||
warn "argument $ARGV[$i] alone" if ($warn_message == 1);
|
warn "argument $ARGV[$i] alone" if ($warn_message == 1 && $i != 0);
|
||||||
$i++;
|
$i++;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue