X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fdb_mysql.pl;h=754bcdab70513de474e122caec07c0e1f1fb0fdf;hb=bba2f29485314c78c2eb5e547a31f5b0a6dfc61e;hp=a88051cf96223a8006f22ef4496c848c6950e72f;hpb=79ddec2f34e07300f6fdb0803b56746b8399c0f4;p=infobot.git diff --git a/src/db_mysql.pl b/src/db_mysql.pl index a88051c..754bcda 100644 --- a/src/db_mysql.pl +++ b/src/db_mysql.pl @@ -186,9 +186,9 @@ sub dbInsert { } ##### -# Usage: &dbReplace($table, $primkey, %hash); +# Usage: &dbReplace($table, $primkey, $primval, %hash); sub dbReplace { - my ($table, $primkey, %hash) = @_; + my ($table, $primkey, $primval, %hash) = @_; my (@keys, @vals); foreach (keys %hash) { @@ -198,7 +198,8 @@ sub dbReplace { } &dbRaw("Replace($table)", "REPLACE INTO $table (".join(',',@keys). - ") VALUES (".join(',',@vals).")" + ") VALUES (".join(',',@vals).") WHERE $primkey=". + &dbQuote($primval) ); return 1; @@ -242,7 +243,7 @@ sub dbRaw { &SQLDebug($query); if (!$sth->execute) { &ERROR("Raw($prefix): => '$query'"); - &ERROR("Raw($prefix): $DBI::errstr"); +# &ERROR("Raw($prefix): $DBI::errstr"); $sth->finish; return 0; }