diff options
| author | Jesse Luehrs <doy@tozt.net> | 2014-01-29 15:01:05 -0500 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2014-01-29 15:01:05 -0500 |
| commit | 58e422a18e68ed948a791ffba824fd67689d02df (patch) | |
| tree | eef8e15ec093499a161ccfb75a80d03735998f4e /lib | |
| parent | 305d1a772ccfff825806fe2dbcbc822a85f05145 (diff) | |
| download | spreadsheet-parsexlsx-58e422a18e68ed948a791ffba824fd67689d02df.tar.gz spreadsheet-parsexlsx-58e422a18e68ed948a791ffba824fd67689d02df.zip | |
support locked and hidden cells (#15)
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Spreadsheet/ParseXLSX.pm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/lib/Spreadsheet/ParseXLSX.pm b/lib/Spreadsheet/ParseXLSX.pm index 9043284..72d8a58 100644 --- a/lib/Spreadsheet/ParseXLSX.pm +++ b/lib/Spreadsheet/ParseXLSX.pm @@ -499,20 +499,26 @@ sub _parse_styles { } $styles->find_nodes('//fonts/font'); my @format = map { - my $alignment = $_->first_child('alignment'); + my $alignment = $_->first_child('alignment'); + my $protection = $_->first_child('protection'); Spreadsheet::ParseExcel::Format->new( IgnoreFont => !$_->att('applyFont'), IgnoreFill => !$_->att('applyFill'), IgnoreBorder => !$_->att('applyBorder'), IgnoreAlignment => !$_->att('applyAlignment'), IgnoreNumberFormat => !$_->att('applyNumberFormat'), + IgnoreProtection => !$_->att('applyProtection'), FontNo => 0+$_->att('fontId'), Font => $font[$_->att('fontId')], FmtIdx => 0+$_->att('numFmtId'), - # Lock => $iLock, - # Hidden => $iHidden, + Lock => $protection + ? $protection->att('locked') + : 0, + Hidden => $protection + ? $protection->att('hidden') + : 0, # Style => $iStyle, # Key123 => $i123, AlignH => $alignment |