bug#71648: 30.0.50; Allow which-key to report on translation bindings

[Robert Pluim]

`which-key-mode' currently only looks at keymaps, not translation
keymaps such as `key-translation-map' and `function-key-map'. In order
to aid discoverability, perhaps it should do the following

(maybe with a user option)

@@ -1942,8 +1949,10 @@ which-key--get-keymap-bindings
 
 (defun which-key--get-current-bindings (&optional prefix filter)
   "Generate a list of current active bindings."
-  (let (bindings)
-    (dolist (map (current-active-maps t) bindings)
+  (let (bindings
+        (maps (nconc (current-active-maps t)
+                     (list key-translation-map function-key-map))))
+    (dolist (map maps bindings)
       (when (cdr map)
         (setq bindings
               (which-key--get-keymap-bindings

Robert
--