diff options
| author | Peter Palfrader <peter@palfrader.org> | 2002-07-02 14:21:38 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2002-07-02 14:21:38 +0000 |
| commit | 2c6e43046a8afc340ef4173a20bd49b3508f1e26 (patch) | |
| tree | 8084b95c2409ec227298427fc7dfc8aa07718bb8 /Echolot/Pinger | |
| parent | c20628b7e29480032155a58ed2aa41fb6cb17952 (diff) | |
Also unlink those evil gnupg backups
Diffstat (limited to 'Echolot/Pinger')
| -rw-r--r-- | Echolot/Pinger/CPunk.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Echolot/Pinger/CPunk.pm b/Echolot/Pinger/CPunk.pm index 93660de..2c80d4d 100644 --- a/Echolot/Pinger/CPunk.pm +++ b/Echolot/Pinger/CPunk.pm @@ -1,7 +1,7 @@ package Echolot::Pinger::CPunk; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: CPunk.pm,v 1.2 2002/06/20 04:25:57 weasel Exp $ +# $Id: CPunk.pm,v 1.3 2002/07/02 14:21:38 weasel Exp $ # =pod @@ -152,6 +152,7 @@ sub encrypt_to($$$$) { unlink ($keyring) or cluck("Cannot unlink tmp keyring '$keyring'"), return undef; + unlink ($keyring.'~'); # gnupg does those evil backups (defined $plaintextfile) and ( unlink ($plaintextfile) or |