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";