Skip to content

Commit 569c7cd

Browse files
committed
lib/Unicode/testnorm.t: fix spelling of skip message
- "environmentvariable" -> "environment variable" - "# skipped:", "# Skip" -> "# SKIP" (mimicking Test::More) - format the two print/skip statements identically - remove redundant "0" statements - use early exit instead of nesting if/else
1 parent 2f67130 commit 569c7cd

File tree

1 file changed

+11
-13
lines changed

1 file changed

+11
-13
lines changed

Diff for: lib/Unicode/testnorm.t

+11-13
Original file line numberDiff line numberDiff line change
@@ -9,18 +9,16 @@ BEGIN {
99
# directory.
1010

1111
if (! $ENV{PERL_DEBUG_FULL_TEST}) {
12-
print "1..0 # skipped: Lengthy Tests Disabled; to enable set environment",
13-
"variable \$ENV{PERL_DEBUG_FULL_TEST} to a true value\n";
14-
0
12+
print "1..0 # SKIP Lengthy Tests Disabled; to enable set environment"
13+
. " variable PERL_DEBUG_FULL_TEST to a true value\n";
14+
exit;
1515
}
16-
else {
17-
my $file = '../lib/unicore/TestNorm.pl';
18-
if (-e $file) {
19-
do $file;
20-
}
21-
else {
22-
print "1..0 # Skip $file not built (perhaps build options don't"
23-
. " build it)\n";
24-
0
25-
}
16+
17+
my $file = '../lib/unicore/TestNorm.pl';
18+
if (! -e $file) {
19+
print "1..0 # SKIP $file not built (perhaps build options don't"
20+
. " build it)\n";
21+
exit;
2622
}
23+
24+
do $file;

0 commit comments

Comments
 (0)