diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 21 |
1 files changed, 12 insertions, 9 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index eeb562166cb..2c55a68b57b 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -2586,15 +2586,18 @@ There might be text before point." (member (match-string 2) tex-verbatim-environments) 0) ;; 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) - (latex-backward-sexp-1) - (latex-find-indent 'virtual)))) + (and (let (escaped) + (or (eq (latex-syntax-after) ?\)) + ;; Try to handle escaped close parens but keep original + ;; position if it doesn't work out. + (setq escaped (looking-at "\\\\\\([])}]\\)"))) + (ignore-errors + (save-excursion + (when escaped + (goto-char (match-beginning 1))) + (latex-skip-close-parens) + (latex-backward-sexp-1) + (latex-find-indent 'virtual))))) ;; Default (maybe an argument) (let ((pos (point)) ;; Outdent \item if necessary. |