From: Joey Hess <joey@kitenet.net>
Date: Sat, 16 Jul 2011 20:09:31 +0000 (-0400)
Subject: avoid undef when dh is run w/o a sequence
X-Git-Tag: 8.9.1~14
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=b07bfa7beac7c86e57e83fd6a09b37b3cf8a367a;p=debhelper.git

avoid undef when dh is run w/o a sequence
---

diff --git a/dh b/dh
index 130d647..f77e594 100755
--- a/dh
+++ b/dh
@@ -335,7 +335,7 @@ my $sequence;
 if (! compat(7)) {
 	# From v8, the sequence is the very first parameter.
 	$sequence=shift @ARGV_orig;
-	if ($sequence=~/^-/) {
+	if (defined $sequence && $sequence=~/^-/) {
 		error "Unknown sequence $sequence (options should not come before the sequence)";
 	}
 }