summaryrefslogtreecommitdiffstats
path: root/t/encryption.t
diff options
context:
space:
mode:
Diffstat (limited to 't/encryption.t')
-rw-r--r--t/encryption.t5
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));