summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Config.pm.orig
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Config.pm.orig')
-rw-r--r--Master/tlpkg/tlperl/lib/Config.pm.orig23
1 files changed, 11 insertions, 12 deletions
diff --git a/Master/tlpkg/tlperl/lib/Config.pm.orig b/Master/tlpkg/tlperl/lib/Config.pm.orig
index b002507bf86..69d13dfbea6 100644
--- a/Master/tlpkg/tlperl/lib/Config.pm.orig
+++ b/Master/tlpkg/tlperl/lib/Config.pm.orig
@@ -10,7 +10,7 @@ use strict;
use warnings;
use vars '%Config', '$VERSION';
-$VERSION = "5.018002";
+$VERSION = "5.020002";
# Skip @Config::EXPORT because it only contains %Config, which we special
# case below as it's not a function. @Config::EXPORT won't change in the
@@ -56,12 +56,11 @@ sub import {
return;
}
-die "Perl lib version (5.18.2) doesn't match executable '$0' version ($])"
+die "$0: Perl lib version (5.20.2) doesn't match executable '$^X' version ($])"
unless $^V;
-$^V eq 5.18.2
- or die "Perl lib version (5.18.2) doesn't match executable '$0' version (" .
- sprintf("v%vd",$^V) . ")";
+$^V eq 5.20.2
+ or die sprintf "%s: Perl lib version (5.20.2) doesn't match executable '$^X' version (%vd)", $0, $^V;
sub FETCH {
@@ -85,7 +84,7 @@ sub AUTOLOAD {
# tie returns the object, so the value returned to require will be true.
tie %Config, 'Config', {
- archlibexp => 'c:\\perl\\lib',
+ archlibexp => 'c:\\tlperl\\lib',
archname => 'MSWin32-x86-multi-thread',
cc => 'gcc',
d_readlink => undef,
@@ -97,16 +96,16 @@ tie %Config, 'Config', {
inc_version_list => '',
intsize => '4',
ldlibpthname => '',
- libpth => 'x:\\strawberry\\c\\lib',
+ libpth => 'X:\\mingw\\lib',
osname => 'MSWin32',
osvers => '4.0',
path_sep => ';',
- privlibexp => 'c:\\perl\\lib',
- scriptdir => 'c:\\perl\\bin',
- sitearchexp => 'c:\\perl\\site\\lib',
- sitelibexp => 'c:\\perl\\site\\lib',
+ privlibexp => 'c:\\tlperl\\lib',
+ scriptdir => 'c:\\tlperl\\bin',
+ sitearchexp => 'c:\\tlperl\\site\\lib',
+ sitelibexp => 'c:\\tlperl\\site\\lib',
so => 'dll',
useithreads => 'define',
usevendorprefix => undef,
- version => '5.18.2',
+ version => '5.20.2',
};