diff options
author | Russ Allbery <rra@stanford.edu> | 2007-08-28 23:43:11 +0000 |
---|---|---|
committer | Russ Allbery <rra@stanford.edu> | 2007-08-28 23:43:11 +0000 |
commit | 3d521b78ecb475dcc2e3ebac0abca061f350ce3b (patch) | |
tree | b531da45442ce9a11f065a2efd93e8bcdd98d504 /perl/Wallet/Object | |
parent | 621e65ff55a4b9105d8d40f9868895a665d890dd (diff) |
Unlink the temporary keytab file after we've gotten the data out of it.
Diffstat (limited to 'perl/Wallet/Object')
-rw-r--r-- | perl/Wallet/Object/Keytab.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl/Wallet/Object/Keytab.pm b/perl/Wallet/Object/Keytab.pm index b386fae..e4cb00c 100644 --- a/perl/Wallet/Object/Keytab.pm +++ b/perl/Wallet/Object/Keytab.pm @@ -178,6 +178,7 @@ sub get { return undef; } close KEYTAB; + unlink $file; $self->log_action ('get', $user, $host, $time); return $data; } |