Browse code
feat(emacs): order changes, undo-fu and evil-collection
Edward Langley authored on 09/06/2021 20:46:23
Showing 2 changed files
Showing 2 changed files
... | ... |
@@ -13,8 +13,16 @@ |
13 | 13 |
(delete-window |
14 | 14 |
(get-mru-window nil nil t))) |
15 | 15 |
|
16 |
+(use-package undo-fu |
|
17 |
+ :ensure t) |
|
18 |
+ |
|
16 | 19 |
(use-package evil |
17 | 20 |
:ensure t |
21 |
+ :after undo-fu |
|
22 |
+ :init |
|
23 |
+ (setq evil-want-integration t) ;; This is optional since it's already set to t by default. |
|
24 |
+ (setq evil-want-keybinding nil) |
|
25 |
+ (setq evil-undo-system 'undo-fu) |
|
18 | 26 |
:config |
19 | 27 |
|
20 | 28 |
(evil-define-key 'motion 'global (kbd "TAB") nil) |
... | ... |
@@ -36,7 +44,8 @@ |
36 | 44 |
(evil-define-key 'normal 'global (kbd "<leader>f") 'helm-projectile) |
37 | 45 |
(evil-define-key 'normal 'global (kbd "<leader>;") 'helm-semantic-or-imenu) |
38 | 46 |
(evil-define-key 'normal 'global (kbd "<leader>j") 'helm-buffers-list) |
39 |
- (evil-define-key 'normal 'global (kbd "<leader>u") 'undo-tree-visualize)) |
|
47 |
+ (comment |
|
48 |
+ (evil-define-key 'normal 'global (kbd "<leader>u") 'undo-tree-visualize))) |
|
40 | 49 |
|
41 | 50 |
(progn ;; completion |
42 | 51 |
(evil-define-key 'normal company-mode-map (kbd "TAB") 'company-indent-or-complete-common) |
... | ... |
@@ -97,35 +106,35 @@ |
97 | 106 |
(define-key global-map (kbd "C-, ]") 'sp-wrap-square) |
98 | 107 |
|
99 | 108 |
(evil-define-key 'normal 'global (kbd ",w\"") 'wrap-with-doublequote) |
100 |
- (define-key cider-mode-map (kbd "C-, w \"") 'sp-wrap-doublequote)) |
|
109 |
+ (comment (define-key cider-mode-map (kbd "C-, w \"") 'sp-wrap-doublequote))) |
|
101 | 110 |
|
102 | 111 |
(progn ;; splicing |
103 | 112 |
(evil-define-key 'normal 'global (kbd ",S") 'sp-splice-sexp) |
104 |
- (define-key cider-mode-map (kbd "C-, S") 'sp-splice-sexp) |
|
105 |
- (define-key cider-mode-map (kbd "C-, C-S") 'sp-splice-sexp) |
|
113 |
+ (comment (define-key cider-mode-map (kbd "C-, S") 'sp-splice-sexp) |
|
114 |
+ (define-key cider-mode-map (kbd "C-, C-S") 'sp-splice-sexp)) |
|
106 | 115 |
(evil-define-key 'normal 'global (kbd ",A") 'sp-splice-sexp-killing-backward) |
107 |
- (define-key cider-mode-map (kbd "C-, A") 'sp-splice-sexp-killing-backward) |
|
108 |
- (define-key cider-mode-map (kbd "C-, C-A") 'sp-splice-sexp-killing-backward) |
|
116 |
+ (comment (define-key cider-mode-map (kbd "C-, A") 'sp-splice-sexp-killing-backward) |
|
117 |
+ (define-key cider-mode-map (kbd "C-, C-A") 'sp-splice-sexp-killing-backward)) |
|
109 | 118 |
(evil-define-key 'normal 'global (kbd ",D") 'sp-splice-sexp-killing-forward) |
110 |
- (define-key cider-mode-map (kbd "C-, D") 'sp-splice-sexp-killing-forward) |
|
111 |
- (define-key cider-mode-map (kbd "C-, C-D") 'sp-splice-sexp-killing-forward) |
|
119 |
+ (comment (define-key cider-mode-map (kbd "C-, D") 'sp-splice-sexp-killing-forward) |
|
120 |
+ (define-key cider-mode-map (kbd "C-, C-D") 'sp-splice-sexp-killing-forward)) |
|
112 | 121 |
(evil-define-key 'normal 'global (kbd ",F") 'sp-splice-sexp-killing-around) |
113 |
- (define-key cider-mode-map (kbd "C-, F") 'sp-splice-sexp-killing-around) |
|
114 |
- (define-key cider-mode-map (kbd "C-, C-F") 'sp-splice-sexp-killing-around)) |
|
122 |
+ (comment (define-key cider-mode-map (kbd "C-, F") 'sp-splice-sexp-killing-around) |
|
123 |
+ (define-key cider-mode-map (kbd "C-, C-F") 'sp-splice-sexp-killing-around))) |
|
115 | 124 |
|
116 | 125 |
(progn ;; barf/slurp |
117 | 126 |
(evil-define-key 'normal 'global (kbd ",,") 'sp-backward-barf-sexp) |
118 |
- (define-key cider-mode-map (kbd "C-, ,") 'sp-backward-barf-sexp) |
|
119 |
- (define-key cider-mode-map (kbd "C-, C-,") 'sp-backward-barf-sexp) |
|
127 |
+ (comment (define-key cider-mode-map (kbd "C-, ,") 'sp-backward-barf-sexp) |
|
128 |
+ (define-key cider-mode-map (kbd "C-, C-,") 'sp-backward-barf-sexp)) |
|
120 | 129 |
(evil-define-key 'normal 'global (kbd ",.") 'sp-forward-barf-sexp) |
121 |
- (define-key cider-mode-map (kbd "C-, .") 'sp-forward-barf-sexp) |
|
122 |
- (define-key cider-mode-map (kbd "C-, C-.") 'sp-forward-barf-sexp) |
|
130 |
+ (comment (define-key cider-mode-map (kbd "C-, .") 'sp-forward-barf-sexp) |
|
131 |
+ (define-key cider-mode-map (kbd "C-, C-.") 'sp-forward-barf-sexp)) |
|
123 | 132 |
(evil-define-key 'normal 'global (kbd ",<") 'sp-backward-slurp-sexp) |
124 |
- (define-key cider-mode-map (kbd "C-, <") 'sp-backward-slurp-sexp) |
|
125 |
- (define-key cider-mode-map (kbd "C-, C-<") 'sp-backward-slurp-sexp) |
|
133 |
+ (comment (define-key cider-mode-map (kbd "C-, <") 'sp-backward-slurp-sexp) |
|
134 |
+ (define-key cider-mode-map (kbd "C-, C-<") 'sp-backward-slurp-sexp)) |
|
126 | 135 |
(evil-define-key 'normal 'global (kbd ",>") 'sp-forward-slurp-sexp) |
127 |
- (define-key cider-mode-map (kbd "C-, >") 'sp-forward-slurp-sexp) |
|
128 |
- (define-key cider-mode-map (kbd "C-, C->") 'sp-forward-slurp-sexp)) |
|
136 |
+ (comment (define-key cider-mode-map (kbd "C-, >") 'sp-forward-slurp-sexp) |
|
137 |
+ (define-key cider-mode-map (kbd "C-, C->") 'sp-forward-slurp-sexp))) |
|
129 | 138 |
|
130 | 139 |
(progn ;; misc |
131 | 140 |
(evil-define-key 'normal 'global (kbd ",~") 'sp-convolute-sexp) |
... | ... |
@@ -142,6 +151,14 @@ |
142 | 151 |
(evil-define-key 'normal 'global (kbd "<leader>nr") 'narrow-to-region) |
143 | 152 |
(evil-define-key 'normal 'global (kbd "<leader>nw") 'widen))) |
144 | 153 |
|
154 |
+(use-package evil-collection |
|
155 |
+ :ensure t |
|
156 |
+ :after evil |
|
157 |
+ :config |
|
158 |
+ (evil-collection-require 'xref) |
|
159 |
+ (with-eval-after-load 'xref |
|
160 |
+ (evil-collection-xref-setup))) |
|
161 |
+ |
|
145 | 162 |
(comment |
146 | 163 |
(use-package centaur-tabs |
147 | 164 |
:ensure t |