This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix a File::Temp test to deal with new Test::More changes.
authorSteve Peters <steve@fisharerojo.org>
Wed, 19 Dec 2007 17:05:16 +0000 (17:05 +0000)
committerSteve Peters <steve@fisharerojo.org>
Wed, 19 Dec 2007 17:05:16 +0000 (17:05 +0000)
p4raw-id: //depot/perl@32657

lib/File/Temp/t/lock.t

index fae86f2..cd62d54 100644 (file)
@@ -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