summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Config.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Config.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/Config.pm13
1 files changed, 6 insertions, 7 deletions
diff --git a/Master/tlpkg/tlperl/lib/Config.pm b/Master/tlpkg/tlperl/lib/Config.pm
index f2c5d76bdef..1257b5287f7 100644
--- a/Master/tlpkg/tlperl/lib/Config.pm
+++ b/Master/tlpkg/tlperl/lib/Config.pm
@@ -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 {
@@ -102,7 +101,7 @@ tie %Config, 'Config', {
inc_version_list => '',
intsize => '4',
ldlibpthname => '',
- libpth => 'x:\\mingw\\lib',
+ libpth => "$mingdir\\lib",
osname => 'MSWin32',
osvers => '4.0',
path_sep => ';',
@@ -113,5 +112,5 @@ tie %Config, 'Config', {
so => 'dll',
useithreads => 'define',
usevendorprefix => undef,
- version => '5.18.2',
+ version => '5.20.2',
};