[Emacs] Better bépo support with Evil
This commit is contained in:
		
							parent
							
								
									294411d73b
								
							
						
					
					
						commit
						ac04636e54
					
				@ -893,6 +893,22 @@ can still feel some influence from my Spacemacs years here.
 | 
				
			|||||||
  :after evil
 | 
					  :after evil
 | 
				
			||||||
  :straight (:build t)
 | 
					  :straight (:build t)
 | 
				
			||||||
  :config
 | 
					  :config
 | 
				
			||||||
 | 
					  ;; bépo conversion
 | 
				
			||||||
 | 
					  (defun my/bépo-rotate-evil-collection (_mode mode-keymaps &rest _rest)
 | 
				
			||||||
 | 
					    (evil-collection-translate-key 'normal mode-keymaps
 | 
				
			||||||
 | 
					      ;; bépo ctsr is qwerty hjkl
 | 
				
			||||||
 | 
					      "c" "h"
 | 
				
			||||||
 | 
					      "t" "j"
 | 
				
			||||||
 | 
					      "s" "k"
 | 
				
			||||||
 | 
					      "r" "l"
 | 
				
			||||||
 | 
					      ;; add back ctsr
 | 
				
			||||||
 | 
					      "h" "c"
 | 
				
			||||||
 | 
					      "j" "t"
 | 
				
			||||||
 | 
					      "k" "s"
 | 
				
			||||||
 | 
					      "l" "r"))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					  (add-hook 'evil-collection-setup-hook #'my/bépo-rotate-evil-collection)
 | 
				
			||||||
 | 
					
 | 
				
			||||||
  (evil-collection-init))
 | 
					  (evil-collection-init))
 | 
				
			||||||
#+end_src
 | 
					#+end_src
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user