From 2c6e43046a8afc340ef4173a20bd49b3508f1e26 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 2 Jul 2002 14:21:38 +0000
Subject: Also unlink those evil gnupg backups

---
 Echolot/Pinger/CPunk.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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
-- 
cgit v1.2.3