From 740f661636d21f1b4c21a5a7d88646d4c90f4019 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Thu, 1 Jun 2006 20:51:45 +0000
Subject: [PATCH] stop getting signatures twice

---
 checksigs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/checksigs b/checksigs
index c45b8d2..bab4c20 100755
--- a/checksigs
+++ b/checksigs
@@ -19,6 +19,7 @@ $config->{gpg_command} = qq($config->{gpg});
 my @keys_to_check = @ARGV;
 
 
+my %got_uid_already;
 sub _get_unknown_keys($$){
      my ($config,$key_id) = @_;
 
@@ -31,7 +32,9 @@ sub _get_unknown_keys($$){
 	      $smime_fingerprint,$flag_field,
 	     ) = split(/\:/,$key_record);
 	  next unless defined $user_id and lc($user_id) eq lc('[User ID not found]');
+	  next if exists $got_uid_already{$user_id};
 	  qx($config->{gpg_command} --recv-keys $full_key_id 2>/dev/null);
+	  $got_uid_already{$user_id} = 1;
 	  print "Retreveved key: 0x".(substr $full_key_id, -8)."\n";
      }
 }
-- 
2.39.5