diff options
author | Jesse Luehrs <doy@tozt.net> | 2015-12-04 00:41:41 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2015-12-04 00:41:59 -0500 |
commit | 963983123e5166b3e8bead9ed8d7d6ac175c1cb1 (patch) | |
tree | 80e72c3e922078fbf0546e5f1a810a585e8c2ac9 /t | |
parent | 95686bb1c95eb60c674055bd6477227357a022c9 (diff) | |
download | spreadsheet-parsexlsx-963983123e5166b3e8bead9ed8d7d6ac175c1cb1.tar.gz spreadsheet-parsexlsx-963983123e5166b3e8bead9ed8d7d6ac175c1cb1.zip |
use the same password api as Spreadsheet::ParseExcel
Diffstat (limited to 't')
-rw-r--r-- | t/encryption.t | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/t/encryption.t b/t/encryption.t index cbd913e..b2d0cca 100644 --- a/t/encryption.t +++ b/t/encryption.t @@ -5,8 +5,8 @@ use Test::More; use Spreadsheet::ParseXLSX; -my $parser = Spreadsheet::ParseXLSX->new(); -my $workbook = $parser->parse("t/data/encryption-agile-123q.xlsx", {password => '123q'}); +my $parser = Spreadsheet::ParseXLSX->new(Password => '123q'); +my $workbook = $parser->parse("t/data/encryption-agile-123q.xlsx"); my $worksheet; my $cell; @@ -19,6 +19,7 @@ ok(defined($cell) && $cell->value() eq 'abcdefgABCDEFG'); open FH, "t/data/encryption-standard-default-password.xlsx"; +$parser = Spreadsheet::ParseXLSX->new(Password => ''); $workbook = $parser->parse(\*FH); ok(defined($workbook)); |