diff options
| author | Slaven_Rezic <bug-Storable@rt.cpan.org> | 2007-07-29 01:10:46 -0400 |
|---|---|---|
| committer | Abhijit Menon-Sen <ams@wiw.org> | 2007-07-29 13:45:31 +0000 |
| commit | a0a37f65bb1838466cf0fcf95607572c013d022a (patch) | |
| tree | e2804f070de25255125ba6a1a41c7b6e4f117554 /ext/Storable | |
| parent | 0df3f8e0ab50aff5c8b517e2759e788a33db4509 (diff) | |
| download | perl-a0a37f65bb1838466cf0fcf95607572c013d022a.tar.gz | |
[rt.cpan.org #28537] PATCH for croak.t test failure
From: Slaven_Rezic via RT <bug-Storable@rt.cpan.org>
Message-Id: <rt-3.6.HEAD-28249-1185700244-992.28537-4-0@rt.cpan.org>
"The attached patch solves a possible failure in the croak.t
test. It seems that in some version Config.pm pre-loads Carp.pm,
causing the test to fail. The patch just makes sure that
Config.pm is only loaded when building Storable within core
perl."
p4raw-id: //depot/perl@31664
Diffstat (limited to 'ext/Storable')
| -rw-r--r-- | ext/Storable/t/croak.t | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/ext/Storable/t/croak.t b/ext/Storable/t/croak.t index 57c51c0134..96c7cb32c8 100644 --- a/ext/Storable/t/croak.t +++ b/ext/Storable/t/croak.t @@ -10,10 +10,13 @@ sub BEGIN { chdir('t') if -d 't'; @INC = ('.', '../lib'); } - require Config; import Config; - if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) { - print "1..0 # Skip: Storable was not built\n"; - exit 0; + if ($ENV{PERL_CORE}) { + require Config; import Config; + %Config=%Config if 0; # cease -w + if ($Config{'extensions'} !~ /\bStorable\b/) { + print "1..0 # Skip: Storable was not built\n"; + exit 0; + } } } |