fix 1.7->1.9 bootstrapping, i think
authorivan <ivan>
Sun, 16 Mar 2008 07:21:26 +0000 (07:21 +0000)
committerivan <ivan>
Sun, 16 Mar 2008 07:21:26 +0000 (07:21 +0000)
FS/FS/UID.pm

index 613ff44..2307c9e 100644 (file)
@@ -114,9 +114,11 @@ sub forksuidsetup {
 
   warn "$me forksuidsetup deciding upon config system to use\n" if $DEBUG;
 
-  my $sth = $dbh->prepare("SELECT COUNT(*) FROM conf") or die $dbh->errstr;
-  $sth->execute or die $sth->errstr;
-  my $confcount = $sth->fetchrow_arrayref->[0];
+  my $confcount = 0;
+
+  my $sth = $dbh->prepare("SELECT COUNT(*) FROM conf") or warn $dbh->errstr;
+  $sth and $sth->execute or warn $sth->errstr;
+  $sth and $confcount = $sth->fetchrow_arrayref->[0];
 
   if ($confcount) {
     $use_confcompat = 0;