Exclude CGI/t/fast.t from the core, as it relies on FCGI, which is not in core.

Whilst the test is designed to skip if FCGI is not present, that logic is now
broken, and even if it were fixed, the as-implemented skip count is now wrong.
We're never going to run this test, as core tests run with just the core's
libraries in @INC, so I see no reason to ship it.

1 files changed, 0 insertions, 39 deletions

diff --git a/cpan/CGI/t/fast.t b/cpan/CGI/t/fast.t
deleted file mode 100644
index 355ec82073..0000000000
--- a/cpan/CGI/t/fast.t
+++ /dev/null
@@ -1,39 +0,0 @@
-#!./perl -w
-
-my $fcgi;
-BEGIN {
-	local $@;
-	eval { require FCGI };
-	$fcgi = $@ ? 0 : 1;
-}
-
-use Test::More tests => 10;
-
-# Shut up "used only once" warnings.
-() = $CGI::Q;
-() = $CGI::Fast::Ext_Request;
-
-SKIP: {
-	skip( 'FCGI not installed, cannot continue', 7 ) unless $fcgi;
-
-	use CGI::Fast;
-	ok( my $q = CGI::Fast->new(), 'created new CGI::Fast object' );
-	is( $q, $CGI::Q, 'checking to see if the object was stored properly' );
-	is( $q->param(), (), 'no params' );
-
-	ok( $q = CGI::Fast->new({ foo => 'bar' }), 'creating object with params' );
-	is( $q->param('foo'), 'bar', 'checking passed param' );
-
-	# if this is false, the package var will be empty
-	$ENV{FCGI_SOCKET_PATH} = 0;
-	is( $CGI::Fast::Ext_Request, undef, 'checking no active request' );
-
-    is($CGI::PRIVATE_TEMPFILES,0, "reality check default value for CGI::PRIVATE_TEMPFILES");
-	import CGI::Fast '-private_tempfiles';
-    CGI::Fast->new;
-    is($CGI::PRIVATE_TEMPFILES,1, "pragma in subclass set package variable in parent class. ");
-    $q = CGI::Fast->new({ a => 1 });
-    ok($q, "reality check: something was returned from CGI::Fast->new besides undef");
-    is($CGI::PRIVATE_TEMPFILES,1, "package variable in parent class persists through multiple calls to CGI::Fast->new ");
-
-};