/[webpac2]/trunk/lib/WebPAC/Output/Excel.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/WebPAC/Output/Excel.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1069 by dpavlin, Tue Nov 27 23:45:28 2007 UTC revision 1070 by dpavlin, Tue Nov 27 23:54:45 2007 UTC
# Line 106  sub add { Line 106  sub add {
106    
107          my $cols = 0;          my $cols = 0;
108    
109          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 );
110          $log->debug("hash from ",$self->filter," = ", sub { dump( $hash ) });          $log->debug("hash from ",$self->filter," = ", sub { dump( $hash ) });
111    
112          my $worksheet = $self->worksheet || $log->logconfess("no worksheet?");          my $worksheet = $self->worksheet || $log->logconfess("no worksheet?");
# Line 134  sub finish { Line 134  sub finish {
134    
135          my $log = $self->_get_logger();          my $log = $self->_get_logger();
136    
137            my $path = $self->path;
138    
139          $self->workbook->close() ||          $self->workbook->close() ||
140                  $log->logdie("can't close Excel file ", $self->path, ": $!");                  $log->logdie("can't close Excel file $path: $!");
141    
142            $log->info("created $path ", -s $path, " bytes with ", $self->line, " rows");
143    
144            return $self->line;
145  }  }
146    
147  =head1 AUTHOR  =head1 AUTHOR

Legend:
Removed from v.1069  
changed lines
  Added in v.1070

  ViewVC Help
Powered by ViewVC 1.1.26