Subject: | DBIx::Log4perl v0.19 : execute_array() : ArrayTupleStatus is printed at INFO level instead of DEBUG |
Date: | Tue, 2 Mar 2010 15:21:37 +0000 (GMT) |
To: | bug-DBIx-Log4perl [...] rt.cpan.org |
From: | Eric ZYLBERSTEJN <ezylby [...] yahoo.fr> |
Hello,
Whenever I call execute_array(), the tuple status array gets printed at INFO level:
2010/03/02 15:34:18 INFO YYY::XXXXXXNotif::reserve 256> $ArrayTupleStatus = [
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1,
-1
];
This is caused by the following lines in DBIx/Log4perl/st.pm :
1 # $Id: st.pm 284 2006-09-07 13:50:57Z martin $
169 $sth->_dbix_l4p_info(2, sub {Data::Dumper->Dump(
170 [$array_tuple_status], ['ArrayTupleStatus'])})
171 if ($h->{logmask} & DBIX_L4P_LOG_INPUT);
I locally changed line 169 to this :
169 $sth->_dbix_l4p_debug($h, 2, sub {Data::Dumper->Dump(
170 [$array_tuple_status], ['ArrayTupleStatus'])})
I am now getting :
2010/03/02 16:16:48 DEBUG XXX::YYYYYYNotif::reserve 256> $ArrayTupleStatus = [-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1];
Best regards
Eric