diff options
| author | Fitz Elliott <felliott@fiskur.org> | 2014-07-05 12:13:01 -0400 |
|---|---|---|
| committer | Fitz Elliott <felliott@fiskur.org> | 2014-07-05 12:13:01 -0400 |
| commit | 61ed182ace7b7ac06a00b0bb9d572cc464b43493 (patch) | |
| tree | e9b2d8c41e562e374586b7edf300f21a125ff4a1 /lib/Spreadsheet/ParseXLSX.pm | |
| parent | a723723da2f4f7155f2f01f42c2502cb65f71b4b (diff) | |
| download | spreadsheet-parsexlsx-61ed182ace7b7ac06a00b0bb9d572cc464b43493.tar.gz spreadsheet-parsexlsx-61ed182ace7b7ac06a00b0bb9d572cc464b43493.zip | |
add TabColor support to ParseXLSX
Diffstat (limited to 'lib/Spreadsheet/ParseXLSX.pm')
| -rw-r--r-- | lib/Spreadsheet/ParseXLSX.pm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/Spreadsheet/ParseXLSX.pm b/lib/Spreadsheet/ParseXLSX.pm index 72c8793..2aecac3 100644 --- a/lib/Spreadsheet/ParseXLSX.pm +++ b/lib/Spreadsheet/ParseXLSX.pm @@ -226,6 +226,14 @@ sub _parse_sheet { $twig->purge; }, + 'sheetPr/tabColor' => sub { + my ( $twig, $tab_color ) = @_; + + $sheet->{TabColor} = $self->_color($sheet->{_Book}{Color}, $tab_color); + + $twig->purge; + }, + } ); |