--- dr/DEFAULT.pm	2005-03-26 13:13:22.000000000 +0000
+++ /tmp/DEFAULT.pm	2005-11-22 18:46:41.000000000 +0000
@@ -457,7 +457,7 @@
     if( !$dbh )
     {
       FAKE_ERROR:
-	if( !$kludge )
+	foreach my $dummy (grep { !$_ } $kludge)
 	{
 	    my @dbd;
 	    @dbd = DBI->available_drivers();