[devscripts] 01/02: dd-list: Rename %info to %sources

[James McCoy]

This is an automated email from the git hooks/post-receive script.

jamessan pushed a commit to branch master
in repository devscripts.

commit 0a9023900911e6c2004aaa4e47426703920eaeff
Author: James McCoy <jamessan at debian.org>
Date:   Sun Oct 4 20:07:14 2015 -0400

    dd-list: Rename %info to %sources
    
    Signed-off-by: James McCoy <jamessan at debian.org>
---
 scripts/dd-list.pl | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/scripts/dd-list.pl b/scripts/dd-list.pl
index f5c1276..8c4d168 100755
--- a/scripts/dd-list.pl
+++ b/scripts/dd-list.pl
@@ -108,7 +108,7 @@ sub parsefh
 				 map { "\Q$_\E" }
 				 keys %package_name;
     }
-    my %info;
+    my %sources;
     while (<$fh>) {
 	my ($package, $source, $binaries, $maintainer, @uploaders);
 
@@ -156,17 +156,17 @@ sub parsefh
 	    if ($check_package) {
 		my @pkgs;
 		if (@pkgs = ($binaries =~ m/$package_names/g)) {
-		    $info{$source}{$version}{binaries} = [@pkgs];
+		    $sources{$source}{$version}{binaries} = [@pkgs];
 		}
 		elsif ($source !~ m/$package_names/) {
 		    next;
 		}
 	    }
 	    else {
-		$info{$source}{$version}{binaries} = [$binaries];
+		$sources{$source}{$version}{binaries} = [$binaries];
 	    }
-	    $info{$source}{$version}{maintainer} = $maintainer;
-	    $info{$source}{$version}{uploaders} = [@uploaders];
+	    $sources{$source}{$version}{maintainer} = $maintainer;
+	    $sources{$source}{$version}{uploaders} = [@uploaders];
 	}
 	else {
 	    warn "E: parse error in stanza $. of $fname\n";
@@ -174,10 +174,10 @@ sub parsefh
 	}
     }
 
-    for my $source (keys %info) {
-	my @versions = sort map { Dpkg::Version->new($_) } keys %{$info{$source}};
+    for my $source (keys %sources) {
+	my @versions = sort map { Dpkg::Version->new($_) } keys %{$sources{$source}};
 	my $version = $versions[-1];
-	my $srcinfo = $info{$source}{$version};
+	my $srcinfo = $sources{$source}{$version};
 	my @names;
 	if ($check_package) {
 	    $package_name{$source}--;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/collab-maint/devscripts.git