diff options
author | Bastien Guerry <bzg@altern.org> | 2012-04-22 08:42:35 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2012-04-22 08:42:35 +0200 |
commit | a1fd7c46269111a4aa4a414d1ca97a236d29583b (patch) | |
tree | a4fa25cb1ebe09d30fe2f615ef9eb101174b7789 | |
parent | c2a6f5de6e00c803afba673b61b942b96fdf9141 (diff) | |
download | org-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.el | 5 |
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 |