[nongnu] elpa/bind-map f835ed39fe 06/97: Minor changes

[ELPA Syncer]

branch: elpa/bind-map
commit f835ed39fee8298fb57d171f3fb0eb93e326f6f6
Author: justbur <justin@burkett.cc>
Commit: justbur <justin@burkett.cc>

    Minor changes
---
 bind-map.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/bind-map.el b/bind-map.el
index 3c246f05da..7bc80e0347 100644
--- a/bind-map.el
+++ b/bind-map.el
@@ -1,4 +1,4 @@
-;;; bind-map.el ---  -*- lexical-binding: t; -*-
+;;; bind-map.el --- Bind personal keymaps in multiple locations -*- 
lexical-binding: t; -*-
 
 ;; Copyright (C) 2015 Justin Burkett
 
@@ -52,7 +52,7 @@
 ;;; Code:
 
 (defgroup bind-map nil
-  "A simple way to manage personal keybindings"
+  "Bind personal keymaps in multiple locations."
   :group 'emacs)
 
 (defcustom bind-map-default-evil-states '(normal motion visual)
@@ -61,7 +61,7 @@
 
 ;;;###autoload
 (defmacro bind-map (map &rest args)
-  "Bind keymap MAP in multiple places.
+  "Bind keymap MAP in multiple locations.
 If MAP is not defined, this will create a new sparse keymap with
 the name MAP. Supports binding in evil states and conditioning
 the bindings on major and/or minor modes being active. The
@@ -97,7 +97,7 @@ unspecified the bindings are global.
 
 :prefix-cmd COMMAND-NAME
 
-Declare a prefix command for  named COMMAND-NAME."
+Declare a prefix command for MAP named COMMAND-NAME."
   (let* ((root-map-sym (intern (format "%s-root-map" map)))
          (major-mode-list (intern (format "%s-major-modes" map)))
          (activate (intern (format "%s-activate" map)))
@@ -133,7 +133,7 @@ Declare a prefix command for  named COMMAND-NAME."
          (defvar-local ,activate nil)
          (cl-pushnew (cons ',activate ,root-map-sym)
                      minor-mode-map-alist)
-         (setq ,major-mode-list (append ',major-modes ,major-mode-list))
+         (nconc ,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))