summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2007-09-19 07:24:45 +0000
committerGlenn Morris <rgm@gnu.org>2007-09-19 07:24:45 +0000
commit120d9fb5a2cf634cf3bf0ca612d44599a0c31f07 (patch)
tree408b00793d899fe50a33c36f38a33c9a67f874bc /lisp
parent41c12ad8763e633735e1b9b7e2d786ec20219341 (diff)
downloademacs-120d9fb5a2cf634cf3bf0ca612d44599a0c31f07.tar.gz
(tex-terminate-paragraph): Leave point at the site of any mismatch.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/textmodes/tex-mode.el23
1 files changed, 11 insertions, 12 deletions
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 3a7a9880d38..e2e0f702547 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -1272,19 +1272,18 @@ area if a mismatch is found."
Check for mismatched braces or $s in paragraph being terminated.
A prefix arg inhibits the checking."
(interactive "*P")
+ (insert "\n\n")
(or inhibit-validation
- (save-excursion
- ;; For the purposes of this, a "paragraph" is a block of text
- ;; wherein all the brackets etc are expected to be balanced. It
- ;; may start after a blank line (ie a "proper" paragraph), or
- ;; a begin{} or end{} block, etc.
- (tex-validate-region
- (save-excursion
- (backward-paragraph)
- (point))
- (point)))
- (message "Paragraph being closed appears to contain a mismatch"))
- (insert "\n\n"))
+ ;; For the purposes of this, a "paragraph" is a block of text
+ ;; wherein all the brackets etc are expected to be balanced. It
+ ;; may start after a blank line (ie a "proper" paragraph), or
+ ;; a begin{} or end{} block, etc.
+ (tex-validate-region
+ (save-excursion
+ (backward-paragraph)
+ (point))
+ (point))
+ (message "Paragraph being closed appears to contain a mismatch")))
(define-skeleton tex-insert-braces
"Make a pair of braces and be poised to type inside of them."