diff options
| author | ivan <ivan> | 2001-12-20 05:34:07 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-12-20 05:34:07 +0000 |
| commit | 1d1703a3c1217c744d2393cbef19364fd595bcb0 (patch) | |
| tree | 2f43da4b05cbf3ef2cd0872945decb5eb42cc6d4 | |
| parent | 363349b93ce19e66749126bd14eed75710e57479 (diff) | |
work better with DBIx::Profile
| -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 995e4bdc2..38f4390db 100644 --- a/FS/FS/Record.pm +++ b/FS/FS/Record.pm @@ -234,9 +234,9 @@ sub qsearch { if ( $record->{$field} =~ /^\d+(\.\d+)?$/ && $dbdef->table($table)->column($field)->type =~ /(int)/i ) { - $sth->bind_param($bind++, $record->{$field}, SQL_INTEGER ); + $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_INTEGER } ); } else { - $sth->bind_param($bind++, $record->{$field}, SQL_VARCHAR ); + $sth->bind_param($bind++, $record->{$field}, { TYPE => SQL_VARCHAR } ); } } |