Author: REHSACK
Date: Tue Jun 29 06:58:07 2010
New Revision: 14199
Modified:
dbi/trunk/DBI.xs
Log:
fix typo
Modified: dbi/trunk/DBI.xs
==============================================================================
--- dbi/trunk/DBI.xs (original)
+++ dbi/trunk/DBI.xs Tue Jun 29 06:58:07 2010
@@ -2131,8 +2131,8 @@
else av = newAV();
i = DBIc_NUM_FIELDS(imp_sth);
if (DBIc_TRACE_LEVEL(imp_sth) >= 10)
- PerlIO_printf(DBILOGFP," <- FETCH $h->{%s} from
$h->{NAME} with $h->{NUM_OF_FIELDS} = %d"
- " and %ld entries in
$->{NAME}\n",
+ PerlIO_printf(DBILOGFP," FETCH $h->{%s} from
$h->{NAME} with $h->{NUM_OF_FIELDS} = %d"
+ " and %ld entries in
$h->{NAME}\n",
neatsvpv(keysv,0), i, AvFILL(name_av)+1);
assert((i == -1 && 0 == AvFILL(name_av)+1) || (i ==
AvFILL(name_av)+1));
while (--i >= 0) {
