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