Explorar el Código

LaTeX export: Fix problem with quotation marks

Carsten Dominik hace 16 años
padre
commit
483463d18f
Se han modificado 2 ficheros con 5 adiciones y 2 borrados
  1. 3 0
      lisp/ChangeLog
  2. 2 2
      lisp/org-latex.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2009-07-02  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-latex.el (org-export-latex-quotation-marks): Fix export of
+	quotation makrs in parenthesis.
+
 	* org-table.el (org-table-get-remote-range): Find #+TBLNAME also
 	when indented.
 

+ 2 - 2
lisp/org-latex.el

@@ -1101,9 +1101,9 @@ links, keywords, lists, tables, fixed-width"
 			'(("\\(\\s-\\)\"" "«~")
 			  ("\\(\\S-\\)\"" "~»")
 			  ("\\(\\s-\\)'" "`"))
-		      '(("\\(\\s-\\)\"" "``")
+		      '(("\\(\\s-\\|(\\)\"" "``")
 			("\\(\\S-\\)\"" "''")
-			("\\(\\s-\\)'" "`")))))
+			("\\(\\s-\\|(\\)'" "`")))))
     (mapc (lambda(l) (goto-char (point-min))
 	    (while (re-search-forward (car l) nil t)
 	      (let ((rpl (concat (match-string 1) (cadr l))))