فهرست منبع

org-e-ascii: Fix table export bug when ignoring sub/superscript

* contrib/lisp/org-e-ascii.el (org-e-ascii--table-cell-width):
  Refactor code.
* contrib/lisp/org-export.el: Do not normalize contents when expanding
  them, since it will be done at the end of the function, and only for
  elements.
Nicolas Goaziou 13 سال پیش
والد
کامیت
72ca00ca09
2فایلهای تغییر یافته به همراه6 افزوده شده و 8 حذف شده
  1. 3 4
      contrib/lisp/org-e-ascii.el
  2. 3 4
      contrib/lisp/org-export.el

+ 3 - 4
contrib/lisp/org-e-ascii.el

@@ -1068,7 +1068,7 @@ holding contextual information."
 (defun org-e-ascii-dynamic-block (dynamic-block contents info)
   "Transcode a DYNAMIC-BLOCK element from Org to ASCII.
 CONTENTS holds the contents of the block.  INFO is a plist
-holding contextual information.  See `org-export-data'."
+holding contextual information."
   contents)
 
 
@@ -1661,13 +1661,12 @@ are ignored. "
 	 (lambda (row)
 	   (setq max-width
 		 (max (length
-		       (mapconcat
-			(lambda (obj) (org-export-data obj info))
+		       (org-export-data
 			(org-element-contents
 			 (elt (if specialp (car (org-element-contents row))
 				(org-element-contents row))
 			      col))
-			""))
+			info))
 		      max-width))))
 	max-width)))
 

+ 3 - 4
contrib/lisp/org-export.el

@@ -1578,10 +1578,9 @@ Return transcoded string."
            ((not (org-export-interpret-p data info))
             (org-export-expand
              data
-             (org-element-normalize-string
-              (mapconcat (lambda (blob) (org-export-data blob info))
-                         (org-element-contents data)
-                         ""))))
+             (mapconcat (lambda (blob) (org-export-data blob info))
+			(org-element-contents data)
+			"")))
            ;; Secondary string.
            ((not type)
             (mapconcat (lambda (obj) (org-export-data obj info)) data ""))