Namespace functions

evil-bookmark.el

@@ -31,7 +31,7 @@
 (require 'evil-collection-util)
 
 (defun evil-bookmark-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    bookmark-bmenu-mode-map
    :mode bookmark-bmenu-mode))
 

evil-collection-util.el

@@ -31,7 +31,7 @@
 (require 'evil)
 (require 'evil-evilified-state)
 
-(defmacro +evil-set-default-state-for-mode (mode state)
+(defmacro evil-collection-util-set-initial-state (mode state)
   "Set the default STATE for MODE."
   (let* ((mode-str (symbol-name mode))
          (state-str (symbol-name state))
@@ -46,7 +46,7 @@
            (evil-normal-state)))
        (advice-add #',mode :after #',defun-name))))
 
-(defmacro +evilify-map (map &rest props)
+(defmacro evil-collection-util-evilify-map (map &rest props)
   "`evilified-state-evilify-map' with additional bindings.
 This assumes the :bindings key is at the end."
   (let ((contains-bindings (plist-get props :bindings)))

evil-compile.el

@@ -31,7 +31,7 @@
 (require 'compile)
 
 (defun evil-compile-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    compilation-mode-map
    :mode compilation-mode
    :bindings

evil-edebug.el

@@ -30,7 +30,7 @@
 (require 'edebug)
 (require 'evil-collection-util)
 
-(+evil-set-default-state-for-mode edebug-mode motion)
+(evil-collection-util-set-initial-state edebug-mode motion)
 
 (defun evil-edebug-setup ()
 

evil-flycheck.el

@@ -33,7 +33,7 @@
 (defvar flycheck-error-list-mode-map)
 
 (defun evil-flycheck-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    flycheck-error-list-mode-map
    :mode flycheck-error-list-mode
    :bindings

evil-ggtags.el

@@ -36,11 +36,11 @@
 (defvar ggtags-navigation-map)
 
 (defun evil-ggtags-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    ggtags-global-mode-map
    :mode ggtags-global-mode)
 
-  (+evilify-map
+  (evil-collection-util-evilify-map
    ggtags-view-search-history-mode-map
    :bindings
    "j" 'ggtags-view-search-history-prev
@@ -53,7 +53,7 @@
    "e" 'evil-forward-word-end
    "E" 'evil-forward-WORD-end)
 
-  (+evilify-map
+  (evil-collection-util-evilify-map
    ggtags-view-tag-history-mode-map
    :bindings
    "\C-j" 'next-error-no-select
@@ -61,7 +61,7 @@
    "e" 'evil-forward-word-end
    "E" 'evil-forward-WORD-end)
 
-  (+evilify-map
+  (evil-collection-util-evilify-map
    ggtags-view-tag-history-mode-map
    :bindings
    "\C-j" 'next-error-no-select
@@ -69,7 +69,7 @@
    "e" 'evil-forward-word-end
    "E" 'evil-forward-WORD-end)
 
-  (+evilify-map
+  (evil-collection-util-evilify-map
    ggtags-navigation-map
    :bindings
    "\C-j" 'next-error

evil-ibuffer.el

@@ -31,7 +31,7 @@
 (require 'ibuffer)
 
 (defun evil-ibuffer-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    ibuffer-mode-map
    :mode ibuffer-mode
    :bindings

evil-p4.el

@@ -33,7 +33,7 @@
 (defvar p4-basic-mode-map)
 
 (defun evil-p4-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    p4-basic-mode-map
    :mode p4-basic-mode
    :bindings

evil-pass.el

@@ -33,7 +33,7 @@
 (defvar pass-mode-map)
 
 (defun evil-pass-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    pass-mode-map
    :mode pass-mode
    :bindings

evil-slime.el

@@ -34,7 +34,7 @@
 (defvar slime-inspector-mode-map)
 
 (defun evil-slime-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    sldb-mode-map
    :mode sldb-mode
    :bindings
@@ -46,7 +46,7 @@
    "gb" 'sldb-break-on-return
    "gB" 'sldb-break-with-default-debugger)
 
-  (+evilify-map
+  (evil-collection-util-evilify-map
    slime-inspector-mode-map
    :mode slime-inspector-mode
    :bindings

evil-vlf.el

@@ -34,7 +34,7 @@
 
 ;;; Code:
 (defun evil-vlf-setup ()
-  (+evilify-map
+  (evil-collection-util-evilify-map
    vlf-mode-map
    :mode vlf-mode
    :bindings