This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove redundant substitution from win32/config_sh.PL
[perl5.git] / win32 / config_sh.PL
index 9b26027..ebea864 100644 (file)
@@ -77,7 +77,6 @@ if (-e $patch_file) {
 }
 
 $opt{VERSION} = "$opt{PERL_REVISION}.$opt{PERL_VERSION}.$opt{PERL_SUBVERSION}";
-$opt{INST_VER} =~ s|~VERSION~|$opt{VERSION}|g;
 $opt{'version_patchlevel_string'} = "version $opt{PERL_VERSION} subversion $opt{PERL_SUBVERSION}";
 $opt{'version_patchlevel_string'} .= " patch $opt{PERL_PATCHLEVEL}" if exists $opt{PERL_PATCHLEVEL};