emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Translate ESC to [escape] (experimental)

Browse source 
This is to fix a keymapping edge case. It _may_ have other
reprecussions, so it must be tested further!
This commit is contained in:
Henrik Lissner 2018-06-04 21:15:03 +02:00
parent 1d9ae834f2
commit 3491ac369f
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 12 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

25
modules/config/default/+bindings.el
View file

@ -335,13 +335,13 @@
[tab] #'helm-execute-persistent-action) [tab] #'helm-execute-persistent-action)
(:after helm-files (:after helm-files
(:map helm-generic-files-map (:map helm-generic-files-map
:e "ESC" #'helm-keyboard-quit) :e [escape] #'helm-keyboard-quit)
(:map helm-find-files-map (:map helm-find-files-map
"C-w" #'helm-find-files-up-one-level "C-w" #'helm-find-files-up-one-level
"TAB" #'helm-execute-persistent-action)) [tab] #'helm-execute-persistent-action))
(:after helm-ag (:after helm-ag
(:map helm-ag-map (:map helm-ag-map
"<backtab>" #'helm-ag-edit))) [backtab] #'helm-ag-edit)))
;; hl-todo ;; hl-todo
:m "]t" #'hl-todo-next :m "]t" #'hl-todo-next
@ -418,8 +418,8 @@
[backspace] #'+snippets/delete-backward-char [backspace] #'+snippets/delete-backward-char
[delete] #'+snippets/delete-forward-char-or-field) [delete] #'+snippets/delete-forward-char-or-field)
(:map yas-minor-mode-map (:map yas-minor-mode-map
:ig "<tab>" yas-maybe-expand :ig [(tab)] yas-maybe-expand
:v "<tab>" #'yas-insert-snippet :v [(tab)] #'yas-insert-snippet
:ig "TAB" yas-maybe-expand :ig "TAB" yas-maybe-expand
:v "TAB" #'yas-insert-snippet)) :v "TAB" #'yas-insert-snippet))
@ -725,10 +725,11 @@
;; This section is dedicated to "fixing" certain keys so that they behave ;; This section is dedicated to "fixing" certain keys so that they behave
;; sensibly (and consistently with similar contexts). ;; sensibly (and consistently with similar contexts).
(define-key input-decode-map [S-iso-lefttab] [backtab]) (if window-system
(define-key! input-decode-map
;; Fix TAB in terminal [S-iso-lefttab] [backtab] ;; Fix MacOS shift+tab
(unless window-system (kbd "ESC") [escape])
;; Fix TAB in terminal
(define-key input-decode-map (kbd "TAB") [tab])) (define-key input-decode-map (kbd "TAB") [tab]))
(after! tabulated-list (after! tabulated-list
@ -748,9 +749,7 @@
[S-M-return] #'evil-open-above [S-M-return] #'evil-open-above
;; Emacsien motions for insert mode ;; Emacsien motions for insert mode
"\C-b" #'backward-word "\C-b" #'backward-word
"\C-f" #'forward-word) "\C-f" #'forward-word
(evil-define-key* 'insert 'global
;; textmate-esque deletion ;; textmate-esque deletion
[M-backspace] #'doom/backward-kill-to-bol-and-indent) [M-backspace] #'doom/backward-kill-to-bol-and-indent)
@ -760,7 +759,7 @@
"\C-f" #'forward-word) "\C-f" #'forward-word)
(after! view (after! view
(define-key view-mode-map (kbd "<escape>") #'View-quit-all))) (define-key view-mode-map [escape] #'View-quit-all)))
;; Restore common editing keys (and ESC) in minibuffer ;; Restore common editing keys (and ESC) in minibuffer
(defun +default|fix-minibuffer-in-map (map) (defun +default|fix-minibuffer-in-map (map)