From 982c054051782b746a40d6ee628df6be193a0575 Mon Sep 17 00:00:00 2001
From: Tony Mountifield <tony@mountifield.org>
Date: Sun, 8 Mar 2026 18:38:18 +0000
Subject: [PATCH] Check for translation missing accelerator key

---
 tools/checkkeys.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/tools/checkkeys.pl b/tools/checkkeys.pl
index 28d322b6c1..a0058af107 100755
--- a/tools/checkkeys.pl
+++ b/tools/checkkeys.pl
@@ -71,6 +71,9 @@
 				my $content = $translation->to_literal();
 				if ($content =~ /\&(.)/) {
 					push @{$keys{$language}{$contextname}{uc $1}}, $content . " (" . $source . ")";
+				} elsif ($content ne '') {
+					# have a translation but without accelerator key
+					printf "\n*** TRANSLATION MISSING ACCELERATOR KEY ***\nOriginal: %s\nTranslation: %s\n\n", $source, $content;
 				}
 			}
 		}