projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
87db725
)
add debugging of bind_param statements
author
ivan
<ivan>
Mon, 7 Jul 2008 21:07:54 +0000
(21:07 +0000)
committer
ivan
<ivan>
Mon, 7 Jul 2008 21:07:54 +0000
(21:07 +0000)
FS/FS/Record.pm
patch
|
blob
|
history
diff --git
a/FS/FS/Record.pm
b/FS/FS/Record.pm
index
a27c4bc
..
9badd5b
100644
(file)
--- a/
FS/FS/Record.pm
+++ b/
FS/FS/Record.pm
@@
-317,6
+317,7
@@
sub qsearch {
}
if ( $DEBUG > 2 ) {
+ no strict 'refs';
%TYPE = map { &{"DBI::$_"} => $_ } @{ $DBI::EXPORT_TAGS{sql_types} }
unless keys %TYPE;
warn " bind_param $bind (for field $field), $value, TYPE $TYPE{$TYPE}\n";