tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Revert "Fix mailto links" 

This reverts commit f61cd6b7a1.
This commit is contained in:
Nicolas Goaziou 2014-04-16 22:46:30 +02:00
parent 817619a50b
commit 7b3c11f797
5 changed files with 5 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
contrib/lisp/ox-groff.el
View File

@ -1251,9 +1251,8 @@ INFO is a plist holding contextual information. See
(imagep (org-export-inline-image-p
link org-groff-inline-image-rules))
(path (cond
((member type '("http" "https" "ftp"))
((member type '("http" "https" "ftp" "mailto"))
(concat type "://" raw-path))
((string= type "mailto") (concat type ":" raw-path))
((string= type "file")
(if (file-name-absolute-p raw-path)
(concat "file://" (expand-file-name raw-path))

6
lisp/ox-html.el
View File

@ -2658,11 +2658,7 @@ INFO is a plist holding contextual information. See
(desc (org-string-nw-p desc))
(path
(cond
((member type '("http" "https" "ftp"))
(org-link-escape
(org-link-unescape
(concat type "://" raw-path)) org-link-escape-chars-browser))
((string= type "mailto")
((member type '("http" "https" "ftp" "mailto"))
(org-link-escape
(org-link-unescape
(concat type "://" raw-path)) org-link-escape-chars-browser))

3
lisp/ox-latex.el
View File

@ -1797,9 +1797,8 @@ INFO is a plist holding contextual information. See
(imagep (org-export-inline-image-p
link org-latex-inline-image-rules))
(path (cond
((member type '("http" "https" "ftp"))
((member type '("http" "https" "ftp" "mailto"))
(concat type "://" raw-path))
((string= type "mailto") (concat type ":" raw-path))
((string= type "file")
(if (not (file-name-absolute-p raw-path)) raw-path
(concat "file://" (expand-file-name raw-path))))

3
lisp/ox-man.el
View File

@ -645,9 +645,8 @@ INFO is a plist holding contextual information. See
(desc (and (not (string= desc "")) desc))
(path (cond
((member type '("http" "https" "ftp"))
((member type '("http" "https" "ftp" "mailto"))
(concat type "://" raw-path))
((string= type "mailto") (concat type ":" raw-path))
((string= type "file")
(if (file-name-absolute-p raw-path)
(concat "file://" (expand-file-name raw-path))

3
lisp/ox-odt.el
View File

@ -2711,9 +2711,8 @@ INFO is a plist holding contextual information. See
(imagep (org-export-inline-image-p
link org-odt-inline-image-rules))
(path (cond
((member type '("http" "https" "ftp"))
((member type '("http" "https" "ftp" "mailto"))
(concat type "://" raw-path))
((string= type "mailto") (concat type ":" raw-path))
((string= type "file")
(if (file-name-absolute-p raw-path)
(concat "file://" (expand-file-name raw-path))