helpful

commit 1a320c996cf648cb2ec58020f0180078b15b5763
parent 07fd87cffbcc243b77c1598477167ce702250c48
Author: Nick Drozd <nicholasdrozd@gmail.com>
Date:   Sat,  7 Jul 2018 19:41:56 -0500

Check against global-keycodes before parent-keycodes

The former is usually a subset of the latter, so check it first.

Diffstat:
M
helpful.el
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/helpful.el b/helpful.el
@@ -1236,8 +1236,8 @@ buffer."
              command-sym (list global-map) nil t))))
     (->> keycodes
          ;; Ignore keybindings from the parent or global map.
-         (--remove (-contains-p parent-keycodes it))
-         (--remove (-contains-p global-keycodes it))
+         (--remove (or (-contains-p global-keycodes it)
+                       (-contains-p parent-keycodes it)))
          ;; Convert raw keycode vectors into human-readable strings.
          (-map #'key-description))))