You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
191 lines
3.8 KiB
191 lines
3.8 KiB
From 7102fd54eb385920ddf41c59e1196fc221ad9ea2 Mon Sep 17 00:00:00 2001
|
|
From: Kent Fredric <kentnl@gentoo.org>
|
|
Date: Wed, 21 Mar 2018 21:08:45 +1300
|
|
Subject: Disable network tests w/ NO_NETWORK_TESTING set.
|
|
|
|
Gentoo users can opt-in to these tests by doing:
|
|
|
|
DIST_TEST_OVERRIDE="do network"
|
|
|
|
Or Similar
|
|
---
|
|
t/01basic.t | 6 ++++++
|
|
t/02callbacks.t | 7 +++++++
|
|
t/04abort-test.t | 7 +++++++
|
|
t/05progress.t | 7 +++++++
|
|
t/08ssl.t | 7 +++++++
|
|
t/09times.t | 7 +++++++
|
|
t/14duphandle.t | 7 ++++++-
|
|
t/15duphandle-callback.t | 7 ++++++-
|
|
t/18twinhandles.t | 7 ++++++-
|
|
t/21write-to-scalar.t | 6 ++++++
|
|
10 files changed, 65 insertions(+), 3 deletions(-)
|
|
|
|
diff --git a/t/01basic.t b/t/01basic.t
|
|
index 93e12b1..77ca444 100644
|
|
--- a/t/01basic.t
|
|
+++ b/t/01basic.t
|
|
@@ -1,5 +1,11 @@
|
|
#!perl
|
|
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
use strict;
|
|
use warnings;
|
|
use Test::More tests => 19;
|
|
diff --git a/t/02callbacks.t b/t/02callbacks.t
|
|
index 76aff4f..344b4c5 100644
|
|
--- a/t/02callbacks.t
|
|
+++ b/t/02callbacks.t
|
|
@@ -1,5 +1,12 @@
|
|
#!perl
|
|
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
+
|
|
use strict;
|
|
use warnings;
|
|
use Test::More tests => 7;
|
|
diff --git a/t/04abort-test.t b/t/04abort-test.t
|
|
index c653c49..dcba4fd 100644
|
|
--- a/t/04abort-test.t
|
|
+++ b/t/04abort-test.t
|
|
@@ -1,5 +1,12 @@
|
|
#!perl
|
|
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
+
|
|
use strict;
|
|
use warnings;
|
|
use Test::More tests => 8;
|
|
diff --git a/t/05progress.t b/t/05progress.t
|
|
index 52129ea..25a08fa 100644
|
|
--- a/t/05progress.t
|
|
+++ b/t/05progress.t
|
|
@@ -1,5 +1,12 @@
|
|
#!perl
|
|
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
+
|
|
use strict;
|
|
use warnings;
|
|
use Test::More tests => 16;
|
|
diff --git a/t/08ssl.t b/t/08ssl.t
|
|
index 7374e06..d332d37 100644
|
|
--- a/t/08ssl.t
|
|
+++ b/t/08ssl.t
|
|
@@ -1,5 +1,12 @@
|
|
#!perl
|
|
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
+
|
|
use strict;
|
|
use warnings;
|
|
use Test::More;
|
|
diff --git a/t/09times.t b/t/09times.t
|
|
index 6b3c43a..49bf76a 100644
|
|
--- a/t/09times.t
|
|
+++ b/t/09times.t
|
|
@@ -1,5 +1,12 @@
|
|
#!perl
|
|
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
+
|
|
use strict;
|
|
use warnings;
|
|
use Test::More tests => 19;
|
|
diff --git a/t/14duphandle.t b/t/14duphandle.t
|
|
index f56ac57..f4211d0 100644
|
|
--- a/t/14duphandle.t
|
|
+++ b/t/14duphandle.t
|
|
@@ -1,5 +1,10 @@
|
|
#!perl
|
|
-
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
use strict;
|
|
use warnings;
|
|
use lib 'inc';
|
|
diff --git a/t/15duphandle-callback.t b/t/15duphandle-callback.t
|
|
index 3c5ecd0..ee67b8a 100644
|
|
--- a/t/15duphandle-callback.t
|
|
+++ b/t/15duphandle-callback.t
|
|
@@ -1,5 +1,10 @@
|
|
#!perl
|
|
-
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
use strict;
|
|
use warnings;
|
|
use lib 'inc';
|
|
diff --git a/t/18twinhandles.t b/t/18twinhandles.t
|
|
index 5b0b86b..a6acdb7 100644
|
|
--- a/t/18twinhandles.t
|
|
+++ b/t/18twinhandles.t
|
|
@@ -1,5 +1,10 @@
|
|
#!perl
|
|
-
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
use strict;
|
|
use warnings;
|
|
use Test::More tests => 12;
|
|
diff --git a/t/21write-to-scalar.t b/t/21write-to-scalar.t
|
|
index 85d916e..6b691b5 100644
|
|
--- a/t/21write-to-scalar.t
|
|
+++ b/t/21write-to-scalar.t
|
|
@@ -1,4 +1,10 @@
|
|
#!perl
|
|
+BEGIN {
|
|
+ if ( $ENV{NO_NETWORK_TESTING} ) {
|
|
+ print "1..0 # SKIP NO_NETWORK_TESTING set";
|
|
+ exit 0;
|
|
+ }
|
|
+}
|
|
use strict;
|
|
use warnings;
|
|
use Test::More 'no_plan';
|
|
--
|
|
2.16.2
|
|
|