From 0f01b842bb2b6fada2579d0278fc53422e8ea62f Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Tue, 15 Feb 2011 10:47:26 +0100 Subject: [PATCH] Small bug fix to org-ascii-level-start (again). --- lisp/org-ascii.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org-ascii.el b/lisp/org-ascii.el index 3cc95e624..dd6f69b68 100644 --- a/lisp/org-ascii.el +++ b/lisp/org-ascii.el @@ -653,7 +653,7 @@ publishing directory." (not (equal (char-before (1- (point))) ?\n))) (insert "\n")) (setq char (or (nth (1- level) org-export-ascii-underline) - (last org-export-ascii-underline))) + (car (last org-export-ascii-underline)))) (unless org-export-with-tags (if (string-match (org-re "[ \t]+\\(:[[:alnum:]_@#%:]+:\\)[ \t]*$") title) (setq title (replace-match "" t t title))))