Add helper to wrap quotes also to org-mode.

1 year ago · c04b4b890f
parent 83ba988848
commit c04b4b890f
1 changed files with 7 additions and 0 deletions
--- a/global.org
+++ b/global.org
@ -1128,6 +1128,13 @@
      (setq org-starting-truncated nil
            org-startup-folded t)
    #+end_src
+*** Helper for quotes
+    #+begin_src emacs-lisp
+      (define-key-alist org-mode-map
+  '(("M-\""        . (lambda (r-begin r-end)
+                       (interactive "r")
+                       (add-delimiter "“" "”" r-begin r-end)))))
+    #+end_src
 *** Cosmetics
    Change the default ellipsis ~...~ to the unicode ellipsis ~…~ and
    set my preferred indentation