Commit | Line | Data |
---|---|---|
b965d173 | 1 | package NoFork; |
2 | ||
3 | BEGIN { | |
4 | *CORE::GLOBAL::fork = sub { die "you should not fork" }; | |
5 | } | |
6 | use Config; | |
7 | tied(%Config)->{d_fork} = 0; # blatant lie | |
8 | ||
9 | =begin TEST | |
10 | ||
11 | Assuming not to much chdir: | |
12 | ||
13 | PERL5OPT='-It/lib -MNoFork' perl -Ilib bin/prove -r t | |
14 | ||
15 | =end TEST | |
16 | ||
17 | =cut | |
18 | ||
19 | 1; | |
20 | ||
21 | # vim:ts=4:sw=4:et:sta |