diff options
| -rw-r--r-- | lisp/textmodes/tex-mode.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index 2c55a68b57b..37b2f3657a0 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el | |||
| @@ -2586,18 +2586,18 @@ There might be text before point." | |||
| 2586 | (member (match-string 2) tex-verbatim-environments) | 2586 | (member (match-string 2) tex-verbatim-environments) |
| 2587 | 0) | 2587 | 0) |
| 2588 | ;; Put leading close-paren where the matching open paren would be. | 2588 | ;; Put leading close-paren where the matching open paren would be. |
| 2589 | (and (let (escaped) | 2589 | (let (escaped) |
| 2590 | (or (eq (latex-syntax-after) ?\)) | 2590 | (and (or (eq (latex-syntax-after) ?\)) |
| 2591 | ;; Try to handle escaped close parens but keep original | 2591 | ;; Try to handle escaped close parens but keep original |
| 2592 | ;; position if it doesn't work out. | 2592 | ;; position if it doesn't work out. |
| 2593 | (setq escaped (looking-at "\\\\\\([])}]\\)"))) | 2593 | (setq escaped (looking-at "\\\\\\([])}]\\)"))) |
| 2594 | (ignore-errors | 2594 | (ignore-errors |
| 2595 | (save-excursion | 2595 | (save-excursion |
| 2596 | (when escaped | 2596 | (when escaped |
| 2597 | (goto-char (match-beginning 1))) | 2597 | (goto-char (match-beginning 1))) |
| 2598 | (latex-skip-close-parens) | 2598 | (latex-skip-close-parens) |
| 2599 | (latex-backward-sexp-1) | 2599 | (latex-backward-sexp-1) |
| 2600 | (latex-find-indent 'virtual))))) | 2600 | (latex-find-indent 'virtual))))) |
| 2601 | ;; Default (maybe an argument) | 2601 | ;; Default (maybe an argument) |
| 2602 | (let ((pos (point)) | 2602 | (let ((pos (point)) |
| 2603 | ;; Outdent \item if necessary. | 2603 | ;; Outdent \item if necessary. |