Skip to content

Commit 439e041

Browse files
committed
t/run/todo.t Move start up code to after the comments
This file is designed for potential newcomers to work in. The comments should be first, for their benefit.
1 parent 5d79c38 commit 439e041

File tree

1 file changed

+12
-12
lines changed

1 file changed

+12
-12
lines changed

t/run/todo.t

Lines changed: 12 additions & 12 deletions
Original file line numberDiff line numberDiff line change
@@ -1,16 +1,4 @@
11
#!./perl
2-
BEGIN {
3-
chdir 't' if -d 't';
4-
require './test.pl'; # for fresh_perl_is() etc
5-
set_up_inc('../lib', '.', '../ext/re');
6-
require './charset_tools.pl';
7-
require './loc_tools.pl';
8-
}
9-
10-
use Config;
11-
12-
use strict;
13-
use warnings;
142

153
# This file is a place for tests that fail at the time they are added here.
164
#
@@ -26,6 +14,18 @@ use warnings;
2614
# it is redundant to the test demonstrating the bug that was intentionally
2715
# fixed, so can be removed altogether.)
2816

17+
BEGIN {
18+
chdir 't' if -d 't';
19+
require './test.pl'; # for fresh_perl_is() etc
20+
set_up_inc('../lib', '.', '../ext/re');
21+
require './charset_tools.pl';
22+
require './loc_tools.pl';
23+
}
24+
25+
use Config;
26+
use strict;
27+
use warnings;
28+
2929
my $switches = "";
3030

3131
my $is_debugging_build = $Config{cppflags} =~ /-DDEBUGGING/;

0 commit comments

Comments
 (0)