From 14dd61b29e8cfd97a4a6ea290e8918fd99136405 Mon Sep 17 00:00:00 2001
From: Jacob Bachmeyer <jcb@gnu.org>
Date: Sat, 11 Mar 2023 19:12:48 -0600
Subject: [PATCH] Fix bug in testsuite keyring checks

---
 testsuite/lib/mockgpg.exp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/testsuite/lib/mockgpg.exp b/testsuite/lib/mockgpg.exp
index cbef9f9..d661c72 100644
--- a/testsuite/lib/mockgpg.exp
+++ b/testsuite/lib/mockgpg.exp
@@ -67,7 +67,8 @@ proc check_test_keyring { testname file keylist } {
 		    }
 		}
 		subkey-of {
-		    set wantkeys($keyid,parent) $val
+		    set wantkeys($keyid,parent) \
+			[format "%016s" [string toupper $val]]
 		}
 		expired -
 		expires {
-- 
2.25.1