about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2022-02-16 23:11:16 -0600
committerCase Duckworth2022-02-16 23:11:25 -0600
commitceff2ca8f113eb9bc3bf9d208ac238bbf2777b52 (patch)
treed0b7fe9936143ff5158654a4c10f906290206361
parentAdd :quit local macro (diff)
downloademacs-ceff2ca8f113eb9bc3bf9d208ac238bbf2777b52.tar.gz
emacs-ceff2ca8f113eb9bc3bf9d208ac238bbf2777b52.zip
Add tel: and mailto: link types
-rw-r--r--lisp/+org.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/+org.el b/lisp/+org.el index be5a37f..6413a73 100644 --- a/lisp/+org.el +++ b/lisp/+org.el
@@ -6,8 +6,7 @@
6(require 'org-element) 6(require 'org-element)
7(require 'ox) 7(require 'ox)
8 8
9;;; org-return-dwim - https://github.com/alphapapa/unpackaged.el 9;;; org-return-dwim - [[https://github.com/alphapapa/unpackaged.el][unpackaged]] and [[http://kitchingroup.cheme.cmu.edu/blog/2017/04/09/A-better-return-in-org-mode/][kitchin]]
10;; http://kitchingroup.cheme.cmu.edu/blog/2017/04/09/A-better-return-in-org-mode/
11 10
12(defun +org-element-descendant-of (type element) 11(defun +org-element-descendant-of (type element)
13 "Return non-nil if ELEMENT is a descendant of TYPE. 12 "Return non-nil if ELEMENT is a descendant of TYPE.
@@ -273,7 +272,9 @@ Return as a list."
273 (rx (sequence bos 272 (rx (sequence bos
274 (or "http" 273 (or "http"
275 "gemini" 274 "gemini"
276 "gopher"))) 275 "gopher"
276 "tel"
277 "mailto")))
277 (current-kill 0)) 278 (current-kill 0))
278 (current-kill 0))) 279 (current-kill 0)))
279 (region-content (when (region-active-p) 280 (region-content (when (region-active-p)