1 files changed, 2 insertions, 1 deletions
diff --git a/dgit b/dgit
index 9b83159..3a1dbc9 100755
--- a/dgit
+++ b/dgit
@@ -4148,9 +4148,10 @@ sub pseudomerge_version_check ($$) {
 	    progress f_
 		"Checking package changelog for archive version %s ...", $v;
 	    my $cd;
+            my $vclogp;
 	    eval {
 		my @xa = ("-f$v", "-t$v");
-		my $vclogp = parsechangelog @xa;
+		$vclogp = parsechangelog @xa;
 		my $gf = sub {
 		    my ($fn) = @_;
 		    [ (getfield $vclogp, $fn),