--- trunk/lib/WebPAC/Output/Excel.pm 2007/11/27 23:54:43 1069 +++ trunk/lib/WebPAC/Output/Excel.pm 2007/11/27 23:54:45 1070 @@ -106,7 +106,7 @@ my $cols = 0; - my $hash = $self->ds_to_hash( $ds, $self->filter, disable_key_mungle => 1 ); + my $hash = $self->ds_to_hash( $ds, $self->filter, disable_key_mungle => 1, single_values => 1 ); $log->debug("hash from ",$self->filter," = ", sub { dump( $hash ) }); my $worksheet = $self->worksheet || $log->logconfess("no worksheet?"); @@ -134,9 +134,14 @@ my $log = $self->_get_logger(); + my $path = $self->path; + $self->workbook->close() || - $log->logdie("can't close Excel file ", $self->path, ": $!"); + $log->logdie("can't close Excel file $path: $!"); + + $log->info("created $path ", -s $path, " bytes with ", $self->line, " rows"); + return $self->line; } =head1 AUTHOR