diff options
| -rw-r--r-- | conf/km-evil.el | 3 | ||||
| -rw-r--r-- | conf/km-mail.el | 15 | ||||
| -rw-r--r-- | init.el | 1 |
3 files changed, 19 insertions, 0 deletions
diff --git a/conf/km-evil.el b/conf/km-evil.el index d6e0ab8..677b55a 100644 --- a/conf/km-evil.el +++ b/conf/km-evil.el @@ -29,6 +29,9 @@ (evil-define-key 'visual lisp-interaction-mode-map ",e" 'eval-region) +(evil-define-key 'normal mail-mode-map ",q" 'server-edit) +(evil-define-key 'normal mail-mode-map ",d" 'server-edit) + (define-key evil-visual-state-map ",c" 'comment-or-uncomment-region) (fset 'comment-this-line ;; this depends on evil bindings "0v$,c") diff --git a/conf/km-mail.el b/conf/km-mail.el new file mode 100644 index 0000000..7a48417 --- /dev/null +++ b/conf/km-mail.el @@ -0,0 +1,15 @@ +(add-to-list 'auto-mode-alist '("/mutt" . mail-mode)) + +(defun km/mail-position () + "Move cursor to first blank line +and position cursor between two blank lines" + (interactive) + (forward-paragraph) + (insert "\n\n") + (previous-line)) + +(defun km/mail-mode-hook () + (auto-fill-mode 1) + (km/mail-position)) + +(add-hook 'mail-mode-hook 'km/mail-mode-hook) @@ -12,6 +12,7 @@ (load "km-evil.el") (load "km-ibuffer.el") (load "km-ido.el") +(load "km-mail.el") (load "km-python.el") (load "km-haskell.el") (load "km-tex.el") |