diff options
| -rw-r--r-- | Porting/corecpan.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Porting/corecpan.pl b/Porting/corecpan.pl index df2a70acc4..eb77fe18b6 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"; } |