From 183c48c91baf37db6cc4d7dea06ed9222a7391d3 Mon Sep 17 00:00:00 2001 From: weasel Date: Wed, 29 Jun 2005 12:18:56 +0000 Subject: [PATCH] Also remove signature packets without timestamp git-svn-id: svn://svn.debian.org/pgp-tools/trunk@92 b513b33f-fedd-0310-b452-c3deb5f4c849 --- caff/pgp-fixkey | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/caff/pgp-fixkey b/caff/pgp-fixkey index d17723b..c4e7c9f 100755 --- a/caff/pgp-fixkey +++ b/caff/pgp-fixkey @@ -263,7 +263,7 @@ if (scalar @KEYIDS == 0) { $thiskey = $keyid; debug("Found key $thiskey"); } elsif ($type eq 'sig' || $type eq 'rev') { - if (($keyid eq '0' x 16) && ($created == 0)) { + if (($keyid eq '0' x 16) || ($created == 0)) { push @KEYIDS, $thiskey if defined $thiskey; info("Adding $thiskey"); $thiskey = undef; @@ -353,8 +353,8 @@ for my $keyid (@KEYIDS) { if (defined $line) { # only if we found a sig here - we never remove revocation packets for instance debug("[sigremoval] doing line $line."); my (undef, undef, undef, undef, $signer, $created, undef, undef, undef) = split /:/, $line; - if ($signer eq ('0' x 16)) { - debug("[sigremoval] not interested in that sig ($signer)."); + if (($signer eq '0' x 16) || ($created == 0)) { + debug("[sigremoval] not interested in that sig ($signer, created: $created)."); $answer = "yes"; }; } else { -- 2.30.2