From 8e4650c887e9affee9f7c94c087f7c511b0cbea3 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sun, 18 Oct 2015 09:27:28 +0200 Subject: [PATCH] ox-ascii: Fix code typo * lisp/ox-ascii.el (org-ascii--describe-links): Fix code typo introduced in d6a718a. --- lisp/ox-ascii.el | 33 ++++++++++++++++----------------- 1 file changed, 16 insertions(+), 17 deletions(-) diff --git a/lisp/ox-ascii.el b/lisp/ox-ascii.el index deb98a6dd..2dfd5b8ca 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. -- 2.11.4.GIT