dani
/
vroom
mirror of https://github.com/dani/vroom.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Better fit column and rows for exported events

This commit is contained in:
Daniel Berteaud 2015-07-17 08:42:52 +02:00
parent ede3ff06e7
commit ed2601866c
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
vroom.pl
View File

@ -1191,6 +1191,11 @@ helper export_events_xlsx => sub {
my $xlsx = Excel::Writer::XLSX->new($tmp);
my $sheet = $xlsx->add_worksheet;
my @headers = qw(id date from_ip user event message);
$sheet->set_column(1, 1, 30);
$sheet->set_column(2, 2, 20);
$sheet->set_column(3, 3, 60);
$sheet->set_column(4, 4, 20);
$sheet->set_column(5, 5, 100);
# Write header
$sheet->write(0, 0, \@headers);
my $row = 1;
@ -1204,6 +1209,10 @@ helper export_events_xlsx => sub {
$events->{$e}->{message}
);
$sheet->write($row, 0, \@details);
my $cr = scalar(split("\n", $events->{$e}->{message}));
if ($cr > 1){
$sheet->set_row($row, $cr*15);
}
$row++;
}
return $tmp;