diff options
author | Jesse Luehrs <doy@tozt.net> | 2015-12-04 02:10:12 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2015-12-04 02:10:12 -0500 |
commit | 1a1e74f0f1c1ebc5e15d17e7824304d8ab59ecb2 (patch) | |
tree | 0f5beb26a1641427bd28002a53d1c2d5d7c1895c /lib/Spreadsheet/ParseXLSX/Decryptor/Agile.pm | |
parent | b8484d0c483a75140fb1afeab66984f0ae48d4eb (diff) | |
download | spreadsheet-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.pm | 7 |
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")); |