diff options
Diffstat (limited to 'lib/App/Glacier/Directory.pm')
-rw-r--r-- | lib/App/Glacier/Directory.pm | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lib/App/Glacier/Directory.pm b/lib/App/Glacier/Directory.pm index 0ab998f..5e3ad46 100644 --- a/lib/App/Glacier/Directory.pm +++ b/lib/App/Glacier/Directory.pm @@ -12,7 +12,6 @@ use constant DB_INFO_KEY => ';00INFO'; sub new { my ($class, $backend, $vault, $glacier, %opts) = @_; - my $ttl = delete $opts{ttl}; (my $vault_name = $vault) =~ s/([^A-Za-z_0-9\.-])/sprintf("%%%02X", ord($1))/gex; map { $opts{$_} =~ s/\$(?:vault|\{vault\})/$vault_name/g } keys %opts; @@ -23,7 +22,6 @@ sub new { if ($self) { $self->{_vault} = $vault; $self->{_glacier} = $glacier; - $self->{_ttl} = $ttl; } return $self; } |