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

ox-ascii: Small refactoring 

* lisp/ox-ascii.el (org-ascii--describe-links): Small refactoring.
This commit is contained in:
Nicolas Goaziou 2016-04-13 23:50:15 +02:00
parent 602fca424d
commit 3135d24239
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ox-ascii.el
View File

@ -929,11 +929,7 @@ channel."
((not (org-element-contents link)) nil)
;; Do not add a link already handled by custom export
;; functions.
((let ((protocol (nth 2 (assoc type org-link-protocols)))
(path (org-element-property :path link)))
(and (functionp protocol)
(funcall protocol (org-link-unescape path) anchor 'ascii)))
nil)
((org-export-custom-protocol-maybe link anchor 'ascii) nil)
(t
(concat
(org-ascii--fill-string