From: Steve Peters Date: Wed, 19 Dec 2007 17:05:16 +0000 (+0000) Subject: Fix a File::Temp test to deal with new Test::More changes. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8fda732ba35b09fe6fd97b1463e2008d5752e71d;p=p5sagit%2Fp5-mst-13.2.git Fix a File::Temp test to deal with new Test::More changes. p4raw-id: //depot/perl@32657 --- diff --git a/lib/File/Temp/t/lock.t b/lib/File/Temp/t/lock.t index fae86f2..cd62d54 100644 --- a/lib/File/Temp/t/lock.t +++ b/lib/File/Temp/t/lock.t @@ -5,14 +5,16 @@ use Test::More; use strict; use Fcntl; -BEGIN {use_ok( "File::Temp" ); } - -# see if we have O_EXLOCK -eval { &Fcntl::O_EXLOCK; }; -if ($@) { - plan skip_all => 'Do not seem to have O_EXLOCK'; -} else { - plan tests => 3; +BEGIN { + # see if we have O_EXLOCK + eval { &Fcntl::O_EXLOCK; }; + if ($@) { + plan skip_all => 'Do not seem to have O_EXLOCK'; + } else { + plan tests => 3; + } + + use_ok( "File::Temp" ); } # Get a tempfile with O_EXLOCK