diff options
| author | Martin Rudalics | 2008-09-23 08:25:44 +0000 |
|---|---|---|
| committer | Martin Rudalics | 2008-09-23 08:25:44 +0000 |
| commit | 8ca37e61fc16825314bc5eebcd86282102eb2961 (patch) | |
| tree | d882586e4ffa155f51e944357076d22e98612741 /lisp/textmodes | |
| parent | be10dcf24782ac9121d9721f4960e063f19beeec (diff) | |
| download | emacs-8ca37e61fc16825314bc5eebcd86282102eb2961.tar.gz emacs-8ca37e61fc16825314bc5eebcd86282102eb2961.zip | |
(latex-find-indent): ... and handle conjunction correctly this time.
Diffstat (limited to 'lisp/textmodes')
| -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. |