aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris <[email protected]>2007-09-20 02:53:58 +0000
committerGlenn Morris <[email protected]>2007-09-20 02:53:58 +0000
commit3cfff67b9e5e50ead17743cbc7deac64ce549b67 (patch)
tree58e50f2caa583ac1227921923b52920d227303c1
parenteba25e7c2caa86dbc47de305f0e20a06dde1ecb3 (diff)
Revert previous change.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/textmodes/tex-mode.el23
2 files changed, 13 insertions, 12 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c989f666aa..f91b0156cf 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -68,7 +68,7 @@
error if the port associated with a service string can't be found.
* textmodes/tex-mode.el (tex-terminate-paragraph):
- Use backward-paragraph. Leave point at the site of any mismatch.
+ Use backward-paragraph.
2007-09-19 Stefan Monnier <[email protected]>
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index e2e0f70254..3a7a9880d3 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -1272,18 +1272,19 @@ 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
- ;; 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")))
+ (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"))
(define-skeleton tex-insert-braces
"Make a pair of braces and be poised to type inside of them."