aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorMartin Rudalics2008-09-23 08:25:44 +0000
committerMartin Rudalics2008-09-23 08:25:44 +0000
commit8ca37e61fc16825314bc5eebcd86282102eb2961 (patch)
treed882586e4ffa155f51e944357076d22e98612741 /lisp/textmodes
parentbe10dcf24782ac9121d9721f4960e063f19beeec (diff)
downloademacs-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.el16
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.