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

    Fix major-mode-list
---
 bind-map.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bind-map.el b/bind-map.el
index dfb6c0d9ce..43da739940 100644
--- a/bind-map.el
+++ b/bind-map.el
@@ -158,7 +158,7 @@ Declare a prefix command for MAP named COMMAND-NAME."
          (defvar-local ,activate nil)
          (cl-pushnew (cons ',activate ,root-map-sym)
                      minor-mode-map-alist)
-         (nconc ,major-mode-list ',major-modes)
+         (setq ,major-mode-list (append ,major-mode-list ',major-modes))
          (defun ,activate-func ()
            (setq ,activate (not (null (member major-mode ,major-mode-list)))))
          (add-hook 'after-change-major-mode-hook ',activate-func))

Reply via email to