summaryrefslogtreecommitdiffstats
path: root/lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2015-12-04 02:10:12 -0500
committerJesse Luehrs <doy@tozt.net>2015-12-04 02:10:12 -0500
commit1a1e74f0f1c1ebc5e15d17e7824304d8ab59ecb2 (patch)
tree0f5beb26a1641427bd28002a53d1c2d5d7c1895c /lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm
parentb8484d0c483a75140fb1afeab66984f0ae48d4eb (diff)
downloadspreadsheet-parsexlsx-1a1e74f0f1c1ebc5e15d17e7824304d8ab59ecb2.tar.gz
spreadsheet-parsexlsx-1a1e74f0f1c1ebc5e15d17e7824304d8ab59ecb2.zip
clean up various nits
Diffstat (limited to 'lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm')
-rw-r--r--lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm7
1 files changed, 0 insertions, 7 deletions
diff --git a/lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm b/lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm
index 3b836e3..c6a0f7c 100644
--- a/lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm
+++ b/lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm
@@ -4,12 +4,6 @@ use warnings;
use base 'Spreadsheet::ParseXLSX::Decryptor';
-sub new {
- my $class = shift;
- my $self = Spreadsheet::ParseXLSX::Decryptor->new(@_);
- bless $self, $class;
-}
-
sub decrypt {
my $self = shift;
my ($encryptedValue, $blockKey) = @_;
@@ -95,7 +89,6 @@ sub decryptFile {
sub verifyPassword {
my $self = shift;
-
my ($encryptedVerifier, $encryptedVerifierHash) = @_;
my $encryptedVerifierHash0 = $self->{hashProc}->($self->decrypt($encryptedVerifier, "\xfe\xa7\xd2\x76\x3b\x4b\x9e\x79"));