Parent Directory | Revision Log | Patch
revision 10 by dpavlin, Mon Nov 3 19:19:39 2008 UTC | revision 11 by dpavlin, Mon Nov 3 19:30:12 2008 UTC | |
---|---|---|
# | Line 85 foreach my $sql_file (@sql_files) { | Line 85 foreach my $sql_file (@sql_files) { |
85 | $sheet_name =~ s/\.sql//; | $sheet_name =~ s/\.sql//; |
86 | ||
87 | # Add a worksheet | # Add a worksheet |
88 | my $worksheet = $workbook->addworksheet($sheet_name); | warn "# clipping sheet name '$sheet_name' to 31 char limit\n" if length $sheet_name > 31; |
89 | my $worksheet = $workbook->addworksheet( substr($sheet_name,0,31) ); | |
90 | ||
91 | print STDERR "working on $sql_file\n" if ($debug); | print STDERR "working on $sql_file\n" if ($debug); |
92 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |