From: weasel <weasel@b513b33f-fedd-0310-b452-c3deb5f4c849>
Date: Wed, 29 Jun 2005 12:18:56 +0000 (+0000)
Subject: Also remove signature packets without timestamp
X-Git-Url: https://git.sthu.org/?a=commitdiff_plain;h=183c48c91baf37db6cc4d7dea06ed9222a7391d3;p=pgp-tools.git

Also remove signature packets without timestamp

git-svn-id: svn://svn.debian.org/pgp-tools/trunk@92 b513b33f-fedd-0310-b452-c3deb5f4c849
---

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 {