1 files changed, 1 insertions, 1 deletions
diff --git a/scripts/dpkg-scanpackages.pl b/scripts/dpkg-scanpackages.pl
index 173377bf8..cc8752eca 100755
--- a/scripts/dpkg-scanpackages.pl
+++ b/scripts/dpkg-scanpackages.pl
@@ -186,7 +186,7 @@ FILE:
 	    next;
 	}
 	
-	my $fields = Dpkg::Control->new(type => CTRL_APT_PKG);
+	my $fields = Dpkg::Control->new(type => CTRL_INDEX_PKG);
 	my $temp = $control;
 	while ($temp =~ s/^\n*(\S+):[ \t]*(.*(\n[ \t].*)*)\n//) {
 	    my ($key, $value) = ($1, $2);