فهرست منبع

Revert "Preserve math environments in title when exporting to LaTeX"

This reverts commit c579f08eeee1cd92b53fdb92925a7d3035012816.
Carsten Dominik 15 سال پیش
والد
کامیت
e1e916d659
1فایلهای تغییر یافته به همراه3 افزوده شده و 23 حذف شده
  1. 3 23
      lisp/org-latex.el

+ 3 - 23
lisp/org-latex.el

@@ -729,33 +729,13 @@ when PUB-DIR is set, use this as the publishing directory."
 	 (org-current-export-file buffer-file-name)
 	 (title (or (and subtree-p (org-export-get-title-from-subtree))
 		    (plist-get opt-plist :title)
-		    (unless (plist-get opt-plist :skip-before-1st-heading)
-		      (let ((pt (org-export-grab-title-from-buffer)))
-			(remove-text-properties 0 (length pt)
-						'(:org-license-to-kill t) pt)
-			pt))
+		    (and (not
+			  (plist-get opt-plist :skip-before-1st-heading))
+			 (org-export-grab-title-from-buffer))
 		    (and buffer-file-name
 			 (file-name-sans-extension
 			  (file-name-nondirectory buffer-file-name)))
 		    "No Title"))
-	 ; Preprocessing preserves math environments in title
-	 (title
-	  (and title (string-match "\\S-" title)
-	       (org-export-preprocess-string
-		title
-		:emph-multiline t
-		:for-LaTeX t
-		:comments nil
-		:tags (plist-get opt-plist :tags)
-		:priority (plist-get opt-plist :priority)
-		:footnotes (plist-get opt-plist :footnotes)
-		:drawers (plist-get opt-plist :drawers)
-		:timestamps (plist-get opt-plist :timestamps)
-		:todo-keywords (plist-get opt-plist :todo-keywords)
-		:add-text nil
-		:select-tags nil
-		:exclude-tags nil
-		:LaTeX-fragments nil)))
 	 (filename
 	  (and (not to-buffer)
 	       (concat