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 | |
| parent | 621e65ff55a4b9105d8d40f9868895a665d890dd (diff) | |
Unlink the temporary keytab file after we've gotten the data out of it.
| -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; } |