summaryrefslogtreecommitdiff
path: root/t/uni
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2011-03-12 17:44:59 +0000
committerNicholas Clark <nick@ccl4.org>2011-03-12 17:44:59 +0000
commit273be65c18c94ccde36c8a6d14c992ff7434681a (patch)
tree0cf5ef49f71ff10ea92fe6bef563b28544a3381f /t/uni
parent63dddcfa05d3d59b8fec7157e6f887bae33b68e6 (diff)
downloadperl-273be65c18c94ccde36c8a6d14c992ff7434681a.tar.gz
Rename test.pl's skip_all_without_extension to *_dynamic_extension().
All callers were using it with dynamic extensions, and also had a skip_all_if_miniperl() for the same extension. Merge the two tests into one function to save repetition.
Diffstat (limited to 't/uni')
-rw-r--r--t/uni/chomp.t3
-rw-r--r--t/uni/chr.t3
-rw-r--r--t/uni/greek.t3
-rw-r--r--t/uni/latin2.t3
-rw-r--r--t/uni/tr_7jis.t3
-rw-r--r--t/uni/tr_eucjp.t3
-rw-r--r--t/uni/tr_sjis.t3
-rw-r--r--t/uni/tr_utf8.t3
8 files changed, 8 insertions, 16 deletions
diff --git a/t/uni/chomp.t b/t/uni/chomp.t
index 1292fb690b..0dca91a9bf 100644
--- a/t/uni/chomp.t
+++ b/t/uni/chomp.t
@@ -2,10 +2,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
use strict;
diff --git a/t/uni/chr.t b/t/uni/chr.t
index 227dc52361..33283e779a 100644
--- a/t/uni/chr.t
+++ b/t/uni/chr.t
@@ -2,10 +2,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
use strict;
diff --git a/t/uni/greek.t b/t/uni/greek.t
index a1ca3c4a27..1737a679fa 100644
--- a/t/uni/greek.t
+++ b/t/uni/greek.t
@@ -2,10 +2,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
plan tests => 72;
diff --git a/t/uni/latin2.t b/t/uni/latin2.t
index 344d1a8279..152747139e 100644
--- a/t/uni/latin2.t
+++ b/t/uni/latin2.t
@@ -2,10 +2,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
plan tests => 94;
diff --git a/t/uni/tr_7jis.t b/t/uni/tr_7jis.t
index 90f34310b2..2118070bfc 100644
--- a/t/uni/tr_7jis.t
+++ b/t/uni/tr_7jis.t
@@ -6,10 +6,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
use strict;
diff --git a/t/uni/tr_eucjp.t b/t/uni/tr_eucjp.t
index 352684d64a..27daf3262b 100644
--- a/t/uni/tr_eucjp.t
+++ b/t/uni/tr_eucjp.t
@@ -5,10 +5,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
use strict;
diff --git a/t/uni/tr_sjis.t b/t/uni/tr_sjis.t
index fca9d6c804..290dd8cf73 100644
--- a/t/uni/tr_sjis.t
+++ b/t/uni/tr_sjis.t
@@ -5,10 +5,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
use strict;
diff --git a/t/uni/tr_utf8.t b/t/uni/tr_utf8.t
index aa8f439820..25a6753365 100644
--- a/t/uni/tr_utf8.t
+++ b/t/uni/tr_utf8.t
@@ -6,10 +6,9 @@
BEGIN {
require './test.pl';
- skip_all_if_miniperl("no dynamic loading on miniperl, no Encode");
+ skip_all_without_dynamic_extension('Encode');
skip_all("EBCDIC") if $::IS_EBCDIC;
skip_all_without_perlio();
- skip_all_without_extension('Encode');
}
use strict;