Commit | Line | Data |
---|---|---|
4343e7c3 MS |
1 | # This is a replacement for the old BEGIN preamble which heads (or |
2 | # should head) up every core test program to prep it for running. | |
3 | # Now instead of: | |
4 | # | |
5 | # BEGIN { | |
6 | # chdir 't' if -d 't'; | |
7 | # @INC = '../lib'; | |
8 | # } | |
9 | # | |
10 | # t/TEST will use -MTestInit. It also doesn't hurt if you "use TestInit" | |
11 | # (not require) in the test scripts. | |
12 | # | |
13 | # PS this is not POD because this should be a very minimalist module in | |
7a315204 | 14 | # case of funaemental perl breakage. |
4343e7c3 | 15 | |
18fc9488 DM |
16 | package TestInit; |
17 | ||
4343e7c3 MS |
18 | chdir 't' if -d 't'; |
19 | @INC = '../lib'; | |
7a315204 | 20 | $0 =~ s/\.dp$//; # for the test.deparse make target |
ec5f1610 RH |
21 | 1; |
22 |