X-Git-Url: https://git.shemshak.org/~bandali/configs/blobdiff_plain/12a0f8f0caca07bcab2081d26c1c871f0bf41982..0864b4dbb656191033a38cbdf24aeefa69b8a8b9:/init.org

diff --git a/init.org b/init.org
index ea41e65..d42c16a 100644
--- a/init.org
+++ b/init.org
@@ -722,11 +722,11 @@ customizing it.
 
   (setq evil-want-visual-char-semi-exclusive t)
 
-  ;; motion state modes
-  (dolist (mode '(ebdb-mode
-                  helpful-mode
-                  view-mode))
-    (evil-set-initial-state mode 'motion))
+  ;; custom mode state mappings
+  (dolist (mspair '((ebdb-mode    . emacs)
+                    (helpful-mode . motion)
+                    (view-mode    . motion)))
+    (evil-set-initial-state (car mspair) (cdr mspair)))
 
   ;; fix tab and indentation in src blocks inside org-mode buffer
   ;; also see https://git.sr.ht/~bandali/dotfiles/commit/0e2ffd584aafdd4cf256bcdf2473f01c3aaaed55
@@ -790,6 +790,9 @@ customizing it.
 (amin--leader-keys
   "/"   '(:ignore t :wk "search")
 
+  "a"   '(:ignore t :wk "apps")
+  "a i" 'ielm
+
   "b"   '(:ignore t :wk "buffers")
   "b k" 'kill-this-buffer
   "b s" 'save-buffer
@@ -798,8 +801,6 @@ customizing it.
   "e b" 'eval-buffer
   "e r" 'eval-region
 
-  "e e" 'shell-pop
-
   "f"   '(:ignore t :wk "files")
 
   "F"   '(:ignore t :wk "frames")
@@ -1780,6 +1781,7 @@ Emacs package that displays available keybindings in popup
 #+begin_src emacs-lisp
 (use-package shell-pop
   :defer 1
+  :general (amin--leader-keys "a s" 'shell-pop)
   :init
   (setq shell-pop-universal-key "C-c e"
         shell-pop-shell-type '("eshell" "*eshell*" (lambda nil (eshell)))))