Check against global-keycodes before parent-keycodes

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

1 files changed, 2 insertions, 2 deletions

diff --git a/helpful.el b/helpful.el
index 4bd6192..ff62ac2 100644
--- 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))))