From b07bfa7beac7c86e57e83fd6a09b37b3cf8a367a Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 16 Jul 2011 16:09:31 -0400
Subject: avoid undef when dh is run w/o a sequence

---
 dh | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'dh')

diff --git a/dh b/dh
index 130d647e..f77e5944 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)";
 	}
 }
-- 
cgit v1.2.3