From: Martin Rudalics <rudalics@gmx.at>
Date: Tue, 23 Sep 2008 06:15:52 +0000 (+0000)
Subject: (latex-find-indent): Try to handle
X-Git-Tag: emacs-pretest-23.0.90~2799
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ee1751a5e8825dda9a11bff6656aaa5099c394c1;p=emacs.git

(latex-find-indent): Try to handle
escaped close parens correctly.  (Bug#954)
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6de4bd738d3..6798406eb42 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-09-23  Martin Rudalics  <rudalics@gmx.at>
+
+	* textmodes/tex-mode.el (latex-find-indent): Try to handle
+	escaped close parens correctly.  (Bug#954)
+
 2008-09-22  Tassilo Horn  <tassilo@member.fsf.org>
 
 	* play/fortune.el (fortune-in-buffer): Fix a bug which forced
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index cdb6e49a327..eeb562166cb 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -2585,8 +2585,11 @@ There might be text before point."
      (and (looking-at "\\\\\\(begin\\|end\\) *{\\([^\n}]+\\)")
 	  (member (match-string 2) tex-verbatim-environments)
 	  0)
-     ;; Put leading close-paren where the matching open brace would be.
-     (and (eq (latex-syntax-after) ?\))
+     ;; Put leading close-paren where the matching open paren would be.
+     (and (or (eq (latex-syntax-after) ?\))
+	      ;; Try to handle escaped close parens.
+	      (and (looking-at "\\\\\\([])}]\\)")
+		   (goto-char (match-beginning 1))))
 	  (ignore-errors
 	    (save-excursion
 	      (latex-skip-close-parens)