瀏覽代碼

org-contacts: Register "tel" link

This has the added benefit of not screwing up the exporter.

Signed-off-by: Simon Thum <simon.thum@gmx.de>
Simon Thum 9 年之前
父節點
當前提交
aa78158036
共有 1 個文件被更改,包括 5 次插入0 次删除
  1. 5 0
      contrib/lisp/org-contacts.el

+ 5 - 0
contrib/lisp/org-contacts.el

@@ -1113,6 +1113,11 @@ link string and return the pure link target."
             (setq colonpos (string-match ":" link))
             (if startpos (substring link (1+ colonpos)) link)))))
 
+;; Add the link type supported by org-contacts-strip-link
+;; so everything is in order for its use in Org files
+(org-add-link-type "tel")
+
+
 (defun org-contacts-split-property (string &optional separators omit-nulls)
   "Custom version of `split-string'.
 Split a property STRING into sub-strings bounded by matches