diff --git a/lib/modules/Sql.pmod/sql.pike b/lib/modules/Sql.pmod/sql.pike index 6f7f1f290d08f1bc22bee4eec58f8c40425a6265..fec94af3589017be6b8eaf2eb22fa53228d3a87b 100644 --- a/lib/modules/Sql.pmod/sql.pike +++ b/lib/modules/Sql.pmod/sql.pike @@ -1,5 +1,5 @@ /* - * $Id: sql.pike,v 1.5 1997/04/23 00:29:03 grubba Exp $ + * $Id: sql.pike,v 1.6 1997/04/23 00:30:26 grubba Exp $ * * Implements the generic parts of the SQL-interface * @@ -8,7 +8,7 @@ //. //. File: sql.pike -//. RCSID: $Id: sql.pike,v 1.5 1997/04/23 00:29:03 grubba Exp $ +//. RCSID: $Id: sql.pike,v 1.6 1997/04/23 00:30:26 grubba Exp $ //. Author: Henrik Grubbstr�m (grubba@infovav.se) //. //. Synopsis: Implements the generic parts of the SQL-interface. @@ -59,7 +59,7 @@ void create(void|string|object host, void|string db, (program_name != "sql.pike")) { /* Don't call ourselves... */ array(mixed) err; - werror("Trying "+program_name+"...\n"); + err = catch { program p = Sql[program_name]; @@ -76,7 +76,6 @@ void create(void|string|object host, void|string db, } return; }; - werror(describe_backtrace(err)+"\n"); } } }