diff options
| author | Lukas Fürmetz <fuermetz@mailbox.org> | 2019-07-18 16:08:41 +0200 |
|---|---|---|
| committer | Lukas Fürmetz <fuermetz@mailbox.org> | 2019-07-18 16:08:41 +0200 |
| commit | dbe4c0c9ea32cfd5ac27cb7cd747baa20331de3a (patch) | |
| tree | 7457823b777742e01047eac81e28f208f6d6100b | |
| parent | 20fa4f6e6054f1af05d8ca64d2102ab5f3c6b4e5 (diff) | |
Format elisp
| -rw-r--r-- | vterm.el | 22 |
1 files changed, 11 insertions, 11 deletions
@@ -182,16 +182,16 @@ for different shell" ;; Function keys and most of C- and M- bindings (mapc (lambda (key) - (define-key vterm-mode-map (kbd key) #'vterm--self-insert)) - (append (cl-loop for number from 1 to 12 - for key = (format "<f%i>" number) - unless (member key vterm-keymap-exceptions) - collect key) - (cl-loop for prefix in '("C-" "M-") - append (cl-loop for char from ?a to ?z - for key = (format "%s%c" prefix char) - unless (member key vterm-keymap-exceptions) - collect key)))) + (define-key vterm-mode-map (kbd key) #'vterm--self-insert)) + (append (cl-loop for number from 1 to 12 + for key = (format "<f%i>" number) + unless (member key vterm-keymap-exceptions) + collect key) + (cl-loop for prefix in '("C-" "M-") + append (cl-loop for char from ?a to ?z + for key = (format "%s%c" prefix char) + unless (member key vterm-keymap-exceptions) + collect key)))) (defun vterm--self-insert () "Sends invoking key to libvterm." @@ -226,7 +226,7 @@ for different shell" (defun vterm-send-return () "Sends C-m to the libvterm." (interactive) - (process-send-string vterm--process "\C-m")) + (process-send-string vterm--process "\C-m")) (defun vterm-yank () "Implementation of `yank' (paste) in vterm." |
