diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-10-18 09:27:28 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-10-18 09:27:28 +0200 |
commit | 8e4650c887e9affee9f7c94c087f7c511b0cbea3 (patch) | |
tree | 7fe22102d3c9ecf6cd8f11f0a9267df91da8a060 | |
parent | f01b3fadbc79d57621b9cd7a8138bfa1b76c4b31 (diff) | |
download | org-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.el | 33 |
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. |