Change 32657 by [EMAIL PROTECTED] on 2007/12/19 17:05:16

        Fix a File::Temp test to deal with new Test::More changes.

Affected files ...

... //depot/perl/lib/File/Temp/t/lock.t#2 edit

Differences ...

==== //depot/perl/lib/File/Temp/t/lock.t#2 (text) ====
Index: perl/lib/File/Temp/t/lock.t
--- perl/lib/File/Temp/t/lock.t#1~32652~        2007-12-19 07:19:41.000000000 
-0800
+++ perl/lib/File/Temp/t/lock.t 2007-12-19 09:05:16.000000000 -0800
@@ -5,14 +5,16 @@
 use strict;
 use Fcntl;
 
-BEGIN {use_ok( "File::Temp" ); }
+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;
+    }
 
-# 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
End of Patch.

Reply via email to