summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2012-04-22 08:42:35 +0200
committerBastien Guerry <bzg@altern.org>2012-04-22 08:42:35 +0200
commita1fd7c46269111a4aa4a414d1ca97a236d29583b (patch)
treea4fa25cb1ebe09d30fe2f615ef9eb101174b7789
parentc2a6f5de6e00c803afba673b61b942b96fdf9141 (diff)
downloadorg-mode-a1fd7c46269111a4aa4a414d1ca97a236d29583b.tar.gz
org-latex.el: Fix bug when escaping special characters in a table.
* org-latex.el (org-export-latex-special-chars): Fix bug when escaping special characters in a table. Thanks to Alexander Willand for reporting this.
-rw-r--r--lisp/org-latex.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/org-latex.el b/lisp/org-latex.el
index 0ff31f7..4fa236a 100644
--- a/lisp/org-latex.el
+++ b/lisp/org-latex.el
@@ -1743,8 +1743,7 @@ See the `org-export-latex.el' code for a complete conversion table."
(goto-char (point-min))
(while (re-search-forward c nil t)
;; Put the point where to check for org-protected
- (unless (or (get-text-property (match-beginning 2) 'org-protected)
- (save-match-data (org-at-table.el-p)))
+ (unless (get-text-property (match-beginning 2) 'org-protected)
(cond ((member (match-string 2) '("\\$" "$"))
(if (equal (match-string 2) "\\$")
nil
@@ -1772,7 +1771,7 @@ See the `org-export-latex.el' code for a complete conversion table."
(replace-match (match-string 2) t t)
(replace-match (concat (match-string 1) "\\"
(match-string 2)) t t)))))
- (unless (save-match-data (org-inside-latex-math-p))
+ (unless (save-match-data (or (org-inside-latex-math-p) (org-at-table-p)))
(cond ((equal (match-string 2) "\\")
(replace-match (or (save-match-data
(org-export-latex-treat-backslash-char