changeset 221:8d2c6358d830

Tests: avoid using FCGI on win32. The FCGI.pm under Windows refuses to listen on 127.0.0.1 and insists on listening on INADDR_ANY. We don't want to.
author Maxim Dounin <mdounin@mdounin.ru>
date Sat, 02 Jun 2012 22:58:09 +0400
parents f6f60780f758
children 5b7883daaf82
files fastcgi.t fastcgi_cache.t fastcgi_header_params.t fastcgi_merge_params.t fastcgi_merge_params2.t
diffstat 5 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/fastcgi.t
+++ b/fastcgi.t
@@ -23,6 +23,7 @@ select STDOUT; $| = 1;
 
 eval { require FCGI; };
 plan(skip_all => 'FCGI not installed') if $@;
+plan(skip_all => 'win32') if $^O eq 'MSWin32';
 
 my $t = Test::Nginx->new()->has(qw/http fastcgi/)->plan(5)
 	->write_file_expand('nginx.conf', <<'EOF');
--- a/fastcgi_cache.t
+++ b/fastcgi_cache.t
@@ -23,6 +23,7 @@ select STDOUT; $| = 1;
 
 eval { require FCGI; };
 plan(skip_all => 'FCGI not installed') if $@;
+plan(skip_all => 'win32') if $^O eq 'MSWin32';
 
 my $t = Test::Nginx->new()->has(qw/http fastcgi cache/)->plan(5)
 	->write_file_expand('nginx.conf', <<'EOF');
--- a/fastcgi_header_params.t
+++ b/fastcgi_header_params.t
@@ -23,6 +23,7 @@ select STDOUT; $| = 1;
 
 eval { require FCGI; };
 plan(skip_all => 'FCGI not installed') if $@;
+plan(skip_all => 'win32') if $^O eq 'MSWin32';
 
 my $t = Test::Nginx->new()->has(qw/http fastcgi/)->plan(1)
 	->write_file_expand('nginx.conf', <<'EOF');
--- a/fastcgi_merge_params.t
+++ b/fastcgi_merge_params.t
@@ -23,7 +23,7 @@ select STDOUT; $| = 1;
 
 eval { require FCGI; };
 plan(skip_all => 'FCGI not installed') if $@;
-
+plan(skip_all => 'win32') if $^O eq 'MSWin32';
 
 my $t = Test::Nginx->new()->has(qw/http fastcgi cache/)->plan(9)
 	->write_file_expand('nginx.conf', <<'EOF');
--- a/fastcgi_merge_params2.t
+++ b/fastcgi_merge_params2.t
@@ -23,7 +23,7 @@ select STDOUT; $| = 1;
 
 eval { require FCGI; };
 plan(skip_all => 'FCGI not installed') if $@;
-
+plan(skip_all => 'win32') if $^O eq 'MSWin32';
 
 my $t = Test::Nginx->new()->has(qw/http fastcgi cache/)->plan(4)
 	->write_file_expand('nginx.conf', <<'EOF');