branch: elpa/bind-map
commit 6ba28e31aaad1e98f1137c017713a7ad034190a7
Author: justbur <jus...@burkett.cc>
Commit: justbur <jus...@burkett.cc>

    Revert change to prefix-cmd handling
---
 bind-map.el | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

diff --git a/bind-map.el b/bind-map.el
index 21467cd955..ee00fd3571 100644
--- a/bind-map.el
+++ b/bind-map.el
@@ -286,11 +286,9 @@ mode maps. Set up by bind-map.el." map))
      `((defvar ,map (make-sparse-keymap))
        (unless (keymapp ,map)
          (error "bind-map: %s is not a keymap" ',map))
-       (unless (and (boundp ',prefix-cmd)
-                    (fboundp ',prefix-cmd))
-         (defvar ,prefix-cmd nil)
-         (setq ,prefix-cmd ,map)
-         (setf (symbol-function ',prefix-cmd) ,map))
+       (defvar ,prefix-cmd nil)
+       (setq ,prefix-cmd ,map)
+       (setf (symbol-function ',prefix-cmd) ,map)
        (defvar ,root-map (make-sparse-keymap))
        (bind-map-put-map-properties ',map
                                     :root-map ',root-map

Reply via email to