ndwarshuis
/
emacs-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

banned some keybindings and begand dired config

This commit is contained in:
petrucci4prez 2018-07-19 23:45:37 -04:00
parent d4ad986e3e
commit 10223ffa8c
2 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
conf.org
View File

@ -244,6 +244,11 @@ event of an error or nonlocal exit."
(and (stringp i) (and (stringp i)
(string-prefix-p prefix i))) (string-prefix-p prefix i)))
str-list)) str-list))
(defun nd/move-key (keymap-from keymap-to key)
"Move KEY from KEYMAP-FROM keymap to KEYMAP-TO keymap."
(define-key keymap-to key (lookup-key keymap-from key))
(define-key keymap-from key nil))
#+END_SRC #+END_SRC
** interactive ** interactive
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
@ -1622,7 +1627,13 @@ I like being evil. All package and custom bindings go here.
;; this is required to make evil collection work ;; this is required to make evil collection work
(setq evil-want-integration nil) (setq evil-want-integration nil)
:config :config
(evil-mode 1)) (evil-mode 1)
;; some keys that should be in emacs-state instead of global
(nd/move-key global-map evil-emacs-state-map (kbd "C-s"))
(nd/move-key global-map evil-emacs-state-map (kbd "C-x C-;"))
(nd/move-key global-map evil-emacs-state-map (kbd "C-x C-l"))
(nd/move-key global-map evil-emacs-state-map (kbd "C-x C-u"))
(nd/move-key global-map evil-emacs-state-map (kbd "C-x C-z")))
#+END_SRC #+END_SRC
*** evil-org *** evil-org
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
@ -1654,7 +1665,8 @@ I like being evil. All package and custom bindings go here.
:ensure t :ensure t
:after evil :after evil
:init :init
(setq evil-collection-modes-list '(flycheck company which-key helm minibuffer mu4e ediff)) (setq evil-collection-modes-list '(dired flycheck company which-key
helm minibuffer mu4e ediff))
:custom :custom
(evil-collection-setup-minibuffer t) (evil-collection-setup-minibuffer t)
:config :config

1
init.el
View File

@ -53,3 +53,4 @@
;; Your init file should contain only one such instance. ;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(aw-leading-char-face ((t (:foreground "#292b2e" :background "#bc6ec5" :height 1.0 :box nil))))) '(aw-leading-char-face ((t (:foreground "#292b2e" :background "#bc6ec5" :height 1.0 :box nil)))))
(put 'dired-find-alternate-file 'disabled nil)