Add “” to bindings

3 years ago · 20698545b9
parent 1c12149e19
commit 20698545b9
1 changed files with 6 additions and 0 deletions
--- a/global.org
+++ b/global.org
@ -717,6 +717,12 @@
                   (auto-fill-mode -1)
                   (visual-line-mode)
                   (flyspell-mode)))
+
+     (define-key-alist message-mode-map
+       '(("M-\""        . (lambda (r-begin r-end)
+                            (interactive "r")
+                            (add-delimiter "“" "”" r-begin r-end)))))
+
   #+end_src

   Use ~mbsync~ te fetch emails from server