(tex-terminate-paragraph): Use backward-paragraph.

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5766439ebb9..71a81882461 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,7 @@
 2007-09-19  Glenn Morris  <rgm@gnu.org>
 
         * textmodes/tex-mode.el (tex-terminate-paragraph): Use
-        backward-paragraph.
+        backward-paragraph.  Leave point at the site of any mismatch.
 
 2007-09-19  Stefan Monnier  <monnier@iro.umontreal.ca>
 
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index cfd5afebe4e..3a7a9880d38 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -1188,6 +1188,7 @@ on the line for the invalidity you want to see."
           (let ((end (point))
                 prev-end)
             ;; Scan the previous paragraph for invalidities.
+            ;; FIXME this should be using something like backward-paragraph.
             (if (search-backward "\n\n" nil t)
                 (progn
                   (setq prev-end (point))
@@ -1273,9 +1274,13 @@ A prefix arg inhibits the checking."
   (interactive "*P")
   (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
-           (search-backward "\n\n" nil 'move)
+           (backward-paragraph)
            (point))
          (point)))
       (message "Paragraph being closed appears to contain a mismatch"))