| 6 |
## |
## |
| 7 |
## ---------------------------------------------------------------------------------------- |
## ---------------------------------------------------------------------------------------- |
| 8 |
## $Log$ |
## $Log$ |
| 9 |
|
## Revision 1.3 2002/12/01 22:26:59 joko |
| 10 |
|
## + minor cosmetics for logging |
| 11 |
|
## |
| 12 |
## Revision 1.2 2002/12/01 04:43:25 joko |
## Revision 1.2 2002/12/01 04:43:25 joko |
| 13 |
## + mapping deatil entries may now be either an ARRAY or a HASH |
## + mapping deatil entries may now be either an ARRAY or a HASH |
| 14 |
## + erase flag is used now (for export-operations) |
## + erase flag is used now (for export-operations) |
| 463 |
print "\n" if $self->{verbose}; |
print "\n" if $self->{verbose}; |
| 464 |
|
|
| 465 |
# build user-message from some stats |
# build user-message from some stats |
| 466 |
my $msg = "stats: $tc"; |
my $msg = "statistics: $tc"; |
| 467 |
|
|
| 468 |
if ($tc->{error_per_row}) { |
if ($tc->{error_per_row}) { |
| 469 |
$msg .= "\n"; |
$msg .= "\n"; |