This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
[win32] @INC construction on win32 cleaned up
[perl5.git]
/
win32
/
config_sh.PL
diff --git
a/win32/config_sh.PL
b/win32/config_sh.PL
index
8194988
..
0c3713c
100644
(file)
--- a/
win32/config_sh.PL
+++ b/
win32/config_sh.PL
@@
-10,7
+10,6
@@
if ($] =~ /\.(\d\d\d)?(\d\d)?$/) { # should always be true
$opt{SUBVERSION} = $2 || '00';
}
-$opt{VERSION} = $];
$opt{'cf_by'} = $ENV{USERNAME} unless $opt{'cf_by'};
$opt{'cf_email'} = $opt{'cf_by'} . '@' . (gethostbyname('localhost'))[0]
unless $opt{'cf_email'};