[Pgp-tools-commit] r888 - trunk/gpgsigs

Guilhem Moulin guilhem-guest at moszumanska.debian.org
Tue Jan 31 19:13:03 UTC 2017


Author: guilhem-guest
Date: 2017-01-31 19:13:03 +0000 (Tue, 31 Jan 2017)
New Revision: 888

Modified:
   trunk/gpgsigs/gpgsigs
Log:
typo

Modified: trunk/gpgsigs/gpgsigs
===================================================================
--- trunk/gpgsigs/gpgsigs	2017-01-31 16:42:59 UTC (rev 887)
+++ trunk/gpgsigs/gpgsigs	2017-01-31 19:13:03 UTC (rev 888)
@@ -244,8 +244,8 @@
 				chomp;
 				# see /usr/share/doc/gnupg/DETAILS.gz
 				if (/^\[GNUPG:\] ATTRIBUTE [0-9A-F]{24}([0-9A-F]{16}) (\d+) (\d+) (\d+) (\d+) \d+ \d+ (\d+)$/) {
-					my $show = $3 == 1 and $4 == 1  and $5 == 1 ? 1 : 0;
-					push @photos, {key => $1, size => $2, revoked => $6 & 0x02, show => $show};
+					my $ignore = ($3 == 1 and $4 == 1 and $5 == 1) ? 0 : 1;
+					push @photos, {key => $1, size => $2, revoked => $6 & 0x02, ignore => $ignore};
 					next;
 				}
 				if (!/^\[GNUPG:\] (?:KEYEXPIRED \d+|SIGEXPIRED(?: deprecated-use-keyexpired-instead)?|KEY_CONSIDERED [0-9A-F]{40} \d+)$/) {
@@ -273,7 +273,7 @@
 		warn "Read $photo->{size} bytes but got $got bytes.\n" if $got != $photo->{size};
 	}
 
-	next if $photo->{revoked} or !$photo->{show}; # ignore revoked attributes
+	next if $photo->{revoked} or $photo->{ignore}; # ignore revoked attributes
 
 	my $key = $photo->{key};
 	my @uats = grep { $uids{$key}->{$_}->{type} eq 'uat' } @{$keys{$key}};




More information about the Pgp-tools-commit mailing list