This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
corelist: Fix typo in variable name
authorThomas Sibley <tsibley@cpan.org>
Wed, 12 Oct 2016 16:44:30 +0000 (09:44 -0700)
committerJames E Keenan <jkeenan@cpan.org>
Thu, 13 Oct 2016 02:05:43 +0000 (22:05 -0400)
dist/Module-CoreList/corelist

index bbe61cc..9f3d335 100644 (file)
@@ -349,10 +349,10 @@ sub module_version {
     print $msg,"\n";
 
     if( defined $ret and exists $Opts{u} ) {
-        my $upsream = $Module::CoreList::upstream{$mod};
-        $upsream = 'undef' unless $upsream;
-        print "upstream: $upsream\n";
-        if ( $upsream ne 'blead' ) {
+        my $upstream = $Module::CoreList::upstream{$mod};
+        $upstream = 'undef' unless $upstream;
+        print "upstream: $upstream\n";
+        if ( $upstream ne 'blead' ) {
             my $bugtracker = $Module::CoreList::bug_tracker{$mod};
             $bugtracker = 'unknown' unless $bugtracker;
             print "bug tracker: $bugtracker\n";