diff options
| author | ivan <ivan> | 2003-11-19 18:13:35 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-11-19 18:13:35 +0000 |
| commit | a3b660670b6c553563cd6095fe2d14754af56341 (patch) | |
| tree | 69a26627e881130d4bbcf3efbc8e69ad4d2a3f5c | |
| parent | 4eec09b9bb69dea116c0f8b5fa81862125aa587c (diff) | |
work around DBD::Pg problems with bind_param
| -rw-r--r-- | FS/FS/Record.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm index 14dfca2cb..63128d1b1 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -313,9 +313,9 @@ sub qsearch { if ( $record->{$field} =~ /^\d+(\.\d+)?$/ && $dbdef->table($table)->column($field)->type =~ /(int|serial)/i ) { - $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_INTEGER } ); + $sth->bind_param($bind++, $record->{$field}, SQL_INTEGER ); } else { - $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_VARCHAR } ); + $sth->bind_param($bind++, $record->{$field}, SQL_VARCHAR ); } } |