Skip to content

Commit 573f400

Browse files
committed
Verify if keybinding is free both in aliases and action bindings
1 parent bea596a commit 573f400

File tree

1 file changed

+2
-3
lines changed

1 file changed

+2
-3
lines changed

resize-window.el

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -342,9 +342,8 @@ If no SIZE is given, extend by `resize-window-lowercase-argument'."
342342

343343
(defun resize-window--key-available? (key)
344344
"Return non-nil if KEY is bound, otherwise return nil."
345-
(let ((keys (mapcar #'resize-window--choice-keybinding
346-
resize-window-dispatch-alist)))
347-
(not (member key keys))))
345+
(and (not (assoc key resize-window-alias-list))
346+
(not (assoc key resize-window-dispatch-alist))))
348347

349348
(defun resize-window-add-choice (key func doc &optional allows-capitals)
350349
"Register a new binding for `resize-window'.

0 commit comments

Comments
 (0)