In option parser test `@ARGV' not `length @ARGV'. Closes:#795710.

1 files changed, 1 insertions, 1 deletions

diff --git a/dgit b/dgit
index eb9a97c..62cd049 100755
--- a/dgit
+++ b/dgit
@@ -3161,7 +3161,7 @@ sub parseopts () {
 	my ($what) = @_;
 	@rvalopts = ($_);
 	if (!defined $val) {
-	    badusage "$what needs a value" unless length @ARGV;
+	    badusage "$what needs a value" unless @ARGV;
 	    $val = shift @ARGV;
 	    push @rvalopts, $val;
 	}