- (defun my-evil-insert-state-to-emacs-state (&optional arg)
- "This advising function is called after `evil-insert-state', to switch to
- emacs state for some modes."
- (when (memq major-mode '(emacs-lisp-mode org-mode))
- (evil-emacs-state)))
+ (defvar my-mode-list-to-use-emacs-as-insert '(emacs-lisp-mode org-mode eshell-mode lisp-interaction-mode))
+ (defvar my-modes-use-emacs-init '(emacs-lisp-mode org-mode lisp-interaction-mode eshell-mode))