Browse Source

ox-ascii: Remove dubious spacing in UTF8 titles

* lisp/ox-ascii.el (org-ascii-template--document-title): Remove
  spurious newline characters in title when exporting to UTF8.

Suggested-by: Rasmus <rasmus@gmx.us>
<http://permalink.gmane.org/gmane.emacs.orgmode/96229>
Nicolas Goaziou 10 years ago
parent
commit
51b206bcd2
1 changed files with 3 additions and 5 deletions
  1. 3 5
      lisp/ox-ascii.el

+ 3 - 5
lisp/ox-ascii.el

@@ -1029,11 +1029,9 @@ INFO is a plist used as a communication channel."
 		 (upcase formatted-title)
 		 (cond
 		  ((and (org-string-nw-p author) (org-string-nw-p email))
-		   (concat (if utf8p "\n\n\n" "\n\n") author "\n" email))
-		  ((org-string-nw-p author)
-		   (concat (if utf8p "\n\n\n" "\n\n") author))
-		  ((org-string-nw-p email)
-		   (concat (if utf8p "\n\n\n" "\n\n") email)))
+		   (concat "\n\n" author "\n" email))
+		  ((org-string-nw-p author) (concat "\n\n" author))
+		  ((org-string-nw-p email) (concat "\n\n" email)))
 		 "\n" line
 		 (when (org-string-nw-p date) (concat "\n\n\n" date))
 		 "\n\n\n") text-width 'center)))))