summaryrefslogtreecommitdiff
path: root/ext/Win32CORE
diff options
context:
space:
mode:
authorYitzchak Scott-Thoennes <sthoenna@efn.org>2007-02-25 16:45:10 -0800
committerSteve Hay <SteveHay@planit.com>2007-02-26 13:27:58 +0000
commit57d226e4c036539e44197f78a5d0e896298c6424 (patch)
treef33af97d503374bb69d33432203b2e8e3575590b /ext/Win32CORE
parent8d9043d1bc80ac715c1a2b9c0b993067de5ccb86 (diff)
downloadperl-57d226e4c036539e44197f78a5d0e896298c6424.tar.gz
Re: [PATCH] Re: Win32 modules & cygwin
From: "Yitzchak Scott-Thoennes" <sthoenna@efn.org> Message-ID: <1300.63.226.247.142.1172479510.squirrel@63.226.247.142> (Stops Win32* extension tests from being run when the corresponding extensions haven't been built) p4raw-id: //depot/perl@30409
Diffstat (limited to 'ext/Win32CORE')
-rw-r--r--ext/Win32CORE/t/win32core.t17
1 files changed, 13 insertions, 4 deletions
diff --git a/ext/Win32CORE/t/win32core.t b/ext/Win32CORE/t/win32core.t
index 2231530bdf..7c637bbe9e 100644
--- a/ext/Win32CORE/t/win32core.t
+++ b/ext/Win32CORE/t/win32core.t
@@ -1,6 +1,15 @@
#!perl
-use Test;
-BEGIN { plan tests => 1 };
-use Win32CORE;
-ok(1);
+use Test::More;
+BEGIN {
+ if ( $ENV{PERL_CORE} ) {
+ require Config;
+ if ( $Config::Config{extensions} !~ /(?<!\S)Win32CORE(?!\S)/ ) {
+ plan skip_all => "Win32CORE extension not built";
+ exit();
+ }
+ }
+
+ plan tests => 1;
+};
+use_ok( "Win32CORE" );