[nongnu] elpa/meow 4ab409f51b: Fix the display priority in keypad popup

[ELPA Syncer]

branch: elpa/meow
commit 4ab409f51b3fe6306edd48135f455646ae2a9a42
Author: DogLooksGood <doglooksgood@hotmail.com>
Commit: DogLooksGood <doglooksgood@hotmail.com>

    Fix the display priority in keypad popup
---
 meow-keypad.el | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/meow-keypad.el b/meow-keypad.el
index 9ba0627a67..346db383f6 100644
--- a/meow-keypad.el
+++ b/meow-keypad.el
@@ -202,14 +202,6 @@
                                     127)
                             (list meow-keypad-literal-prefix 127))))
             (suppress-keymap km t)
-            (map-keymap
-             (lambda (key def)
-               (unless (member 'control (event-modifiers key))
-                 (unless (member key ignores)
-                   (let ((k (vector (meow--get-event-key key))))
-                     (unless (lookup-key km k)
-                       (define-key km (vector (meow--get-event-key key)) 
(funcall meow-keypad-get-title-function def)))))))
-             keymap)
             (map-keymap
              (lambda (key def)
                (when (member 'control (event-modifiers key))
@@ -219,6 +211,14 @@
                        (unless (lookup-key km k)
                          (define-key km k (funcall 
meow-keypad-get-title-function def))))))))
              keymap)
+            (map-keymap
+             (lambda (key def)
+               (unless (member 'control (event-modifiers key))
+                 (unless (member key ignores)
+                   (let ((k (vector (meow--get-event-key key))))
+                     (unless (lookup-key km k)
+                       (define-key km (vector (meow--get-event-key key)) 
(funcall meow-keypad-get-title-function def)))))))
+             keymap)
             km)))))))
 
 (defun meow--keypad-display-message ()