Bugfix.

Rev: lib/modules/Sql.pmod/sql.pike:1.29

lib/modules/Sql.pmod/sql.pike

 /*
- * $Id: sql.pike,v 1.28 1998/11/04 12:35:15 grubba Exp $
+ * $Id: sql.pike,v 1.29 1999/06/01 20:41:00 marcus Exp $
  *
  * Implements the generic parts of the SQL-interface
  *
@@ -8,7 +8,7 @@
 
 //.
 //. File:	sql.pike
-//. RCSID:	$Id: sql.pike,v 1.28 1998/11/04 12:35:15 grubba Exp $
+//. RCSID:	$Id: sql.pike,v 1.29 1999/06/01 20:41:00 marcus Exp $
 //. Author:	Henrik Grubbstrm (grubba@idonex.se)
 //.
 //. Synopsis:	Implements the generic parts of the SQL-interface.
@@ -220,6 +220,7 @@ void create(void|string|object host, void|string db,
 	      } else {
 		master_sql = p();
 	      }
+	      if(master_sql)
 		break;
 	    };
 	    if (err) {