Change 28485 by [EMAIL PROTECTED] on 2006/07/05 15:40:05

        Skip lib/Memoize/t/tie_ndbm.t if $TMP is not writable.

Affected files ...

... //depot/perl/lib/Memoize/t/tie_ndbm.t#10 edit

Differences ...

==== //depot/perl/lib/Memoize/t/tie_ndbm.t#10 (text) ====
Index: perl/lib/Memoize/t/tie_ndbm.t
--- perl/lib/Memoize/t/tie_ndbm.t#9~24078~      2005-03-25 12:57:46.000000000 
-0800
+++ perl/lib/Memoize/t/tie_ndbm.t       2006-07-05 08:40:05.000000000 -0700
@@ -26,6 +26,11 @@
   exit 0;
 }
 
+if (! -w $ENV{TMP}) {
+  print "1..0\n";
+  exit 0;
+}
+
 print "1..4\n";
 
 $file = "md$$";
End of Patch.

Reply via email to