summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2015-10-18 09:27:28 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2015-10-18 09:27:28 +0200
commit8e4650c887e9affee9f7c94c087f7c511b0cbea3 (patch)
tree7fe22102d3c9ecf6cd8f11f0a9267df91da8a060
parentf01b3fadbc79d57621b9cd7a8138bfa1b76c4b31 (diff)
downloadorg-mode-8e4650c887e9affee9f7c94c087f7c511b0cbea3.tar.gz
ox-ascii: Fix code typo
* lisp/ox-ascii.el (org-ascii--describe-links): Fix code typo introduced in d6a718a.
-rw-r--r--lisp/ox-ascii.el33
1 files changed, 16 insertions, 17 deletions
diff --git a/lisp/ox-ascii.el b/lisp/ox-ascii.el
index deb98a6..2dfd5b8 100644
--- a/lisp/ox-ascii.el
+++ b/lisp/ox-ascii.el
@@ -916,23 +916,22 @@ channel."
;; Id and custom-id links: Headlines refer to their numbering.
((member type '("custom-id" "id"))
(let ((dest (org-export-resolve-id-link link info)))
- (if (concat
- (org-ascii--fill-string
- (format
- "[%s] %s"
- anchor
- (if (stringp dest) ; External file.
- dest
- (format
- (org-ascii--translate "See section %s" info)
- (if (org-export-numbered-headline-p dest info)
- (mapconcat #'number-to-string
- (org-export-get-headline-number dest info)
- ".")
- (org-export-data
- (org-element-property :title dest) info)))))
- width info)
- "\n\n"))))
+ (concat
+ (org-ascii--fill-string
+ (format
+ "[%s] %s"
+ anchor
+ (if (stringp dest) ; External file.
+ dest
+ (format
+ (org-ascii--translate "See section %s" info)
+ (if (org-export-numbered-headline-p dest info)
+ (mapconcat #'number-to-string
+ (org-export-get-headline-number dest info)
+ ".")
+ (org-export-data (org-element-property :title dest) info)))))
+ width info)
+ "\n\n")))
;; Do not add a link that cannot be resolved and doesn't have
;; any description: destination is already visible in the
;; paragraph.