diff options
author | Glenn Morris <rgm@gnu.org> | 2007-09-19 07:24:45 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2007-09-19 07:24:45 +0000 |
commit | 120d9fb5a2cf634cf3bf0ca612d44599a0c31f07 (patch) | |
tree | 408b00793d899fe50a33c36f38a33c9a67f874bc /lisp | |
parent | 41c12ad8763e633735e1b9b7e2d786ec20219341 (diff) | |
download | emacs-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.el | 23 |
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." |