Author: timbo
Date: Tue May 11 08:02:23 2004
New Revision: 336

Modified:
   dbi/trunk/t/01basics.t
Log:
Fix some problems with test skipping


Modified: dbi/trunk/t/01basics.t
==============================================================================
--- dbi/trunk/t/01basics.t      (original)
+++ dbi/trunk/t/01basics.t      Tue May 11 08:02:23 2004
@@ -150,7 +150,7 @@
 cmp_ok($DBI::dbi_debug, '==',  0, "... DBI::dbi_debug's initial state is 0");
 
 SKIP: {
-       skip "cannot find : /dev/null", 2 unless (-f "/dev/null");      
+    skip "cannot find : /dev/null", 2 unless (-e "/dev/null"); 
     DBI->trace(42,"/dev/null");
     cmp_ok($DBI::dbi_debug, '==', 42, "... DBI::dbi_debug is 42");
        DBI->trace(0, undef);
@@ -246,7 +246,7 @@
 # restrict this test to just developers
 
 SKIP: {
-       skip 'these tests only for developers', 4 if (-d ".svn");
+       skip 'developer tests', 4 unless -d ".svn";
        
        print "Test DBI->installed_versions (for @drivers)\n";
        print "(If one of those drivers, or the configuration for it, is bad\n";

Reply via email to