This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Upgrade to MakeMaker 6.20.
[perl5.git] / lib / ExtUtils / MM_Any.pm
index 98e6a48..f03985b 100644 (file)
@@ -2,7 +2,7 @@ package ExtUtils::MM_Any;
 
 use strict;
 use vars qw($VERSION @ISA);
-$VERSION = 0.08;
+$VERSION = 0.09;
 @ISA = qw(File::Spec);
 
 use Config;
@@ -628,7 +628,7 @@ YAML
 
     my @write_meta = $self->echo($meta, 'META_new.yml');
     my $move = $self->oneliner(<<'CODE', ['-MExtUtils::Command', '-MFile::Compare']);
-compare(@ARGV) != 0 ? (mv or warn "Cannot move @ARGV: $!\n") : unlink(shift);
+compare(@ARGV) != 0 ? (mv or warn "Cannot move @ARGV: $$!\n") : unlink(shift);
 CODE
 
     return sprintf <<'MAKE_FRAG', join("\n\t", @write_meta), $move;