Fix undef warning in Vcs-Git handling

1 files changed, 1 insertions, 1 deletions

diff --git a/dgit b/dgit
index 3a79bb6..68d8b42 100755
--- a/dgit
+++ b/dgit
@@ -1503,8 +1503,8 @@ sub clone ($) {
     }
     fetch_from_archive() or no_such_package;
     my $vcsgiturl = $dsc->{'Vcs-Git'};
-    $vcsgiturl =~ s/\s+-b\s+\S+//g;
     if (length $vcsgiturl) {
+	$vcsgiturl =~ s/\s+-b\s+\S+//g;
 	runcmd @git, qw(remote add vcs-git), $vcsgiturl;
     }
     runcmd @git, qw(reset --hard), lrref();