X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Porting%2Fcorecpan.pl;h=eb77fe18b6ae4653e1ec80bb8343fe7cdf4b327a;hb=6e0733998eff7a098d2d21d5602f3eb2a7521e1f;hp=df2a70acc46c43e00be16e7acaada6fe2168373d;hpb=b78893c9935e40731b0134c5996886a293086d32;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/Porting/corecpan.pl b/Porting/corecpan.pl
index df2a70a..eb77fe1 100644
--- a/Porting/corecpan.pl
+++ b/Porting/corecpan.pl
@@ -148,7 +148,7 @@ else {
     for my $dist (sort keys %results) {
 	print "Module $dist...\n";
 	for my $file (sort keys %{$results{$dist}}) {
-	    my ($vcpan, $vcore) = @{$results{$dist}{$file}}{@labels};
+	    my ($vcore, $vcpan) = @{$results{$dist}{$file}}{@labels};
 	    if (our $opt_v or $vcore ne $vcpan) {
 		print "    $file: core=$vcore, cpan=$vcpan\n";
 	    }