From 245c68e937d090a496fe5f34381fcacc33dfd76b Mon Sep 17 00:00:00 2001 From: weasel Date: Wed, 20 Oct 2004 11:04:57 +0000 Subject: [PATCH] some debug output in sigremoval git-svn-id: svn://svn.debian.org/pgp-tools/trunk@20 b513b33f-fedd-0310-b452-c3deb5f4c849 --- caff/caff | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/caff/caff b/caff/caff index 6b23803..718e847 100755 --- a/caff/caff +++ b/caff/caff @@ -686,14 +686,18 @@ for my $keyid (@keyids_ok) { my @sigline = grep { /^sig/ } (split /\n/, $stdout); my $line = pop @sigline; my $answer = "no"; + debug("[sigremoval] doing line $line."); if (defined $line) { # only if we found a sig here - we never remove revocation packets for instance my ($dummy1, $dummy2, $dummy3, $dummy4, $signer, $created, $dummy7, $dummy8, $dummy9) = split /:/, $line; if ($signer eq $longkeyid) { + debug("[sigremoval] selfsig ($signer)."); $answer = "no"; } elsif (grep { $signer eq $_ } @{$CONFIG{'keyid'}}) { + debug("[sigremoval] signed by us ($signer)."); $answer = "no"; $signed_by_me = $signed_by_me > $created ? $signed_by_me : $created; } else { + debug("[sigremoval] not interested in that sig ($signer)."); $answer = "yes"; }; }; -- 2.30.2