diff options
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." | |||
| 1272 | Check for mismatched braces or $s in paragraph being terminated. | 1272 | Check for mismatched braces or $s in paragraph being terminated. |
| 1273 | A prefix arg inhibits the checking." | 1273 | A prefix arg inhibits the checking." |
| 1274 | (interactive "*P") | 1274 | (interactive "*P") |
| 1275 | (insert "\n\n") | ||
| 1275 | (or inhibit-validation | 1276 | (or inhibit-validation |
| 1276 | (save-excursion | 1277 | ;; For the purposes of this, a "paragraph" is a block of text |
| 1277 | ;; For the purposes of this, a "paragraph" is a block of text | 1278 | ;; wherein all the brackets etc are expected to be balanced. It |
| 1278 | ;; wherein all the brackets etc are expected to be balanced. It | 1279 | ;; may start after a blank line (ie a "proper" paragraph), or |
| 1279 | ;; may start after a blank line (ie a "proper" paragraph), or | 1280 | ;; a begin{} or end{} block, etc. |
| 1280 | ;; a begin{} or end{} block, etc. | 1281 | (tex-validate-region |
| 1281 | (tex-validate-region | 1282 | (save-excursion |
| 1282 | (save-excursion | 1283 | (backward-paragraph) |
| 1283 | (backward-paragraph) | 1284 | (point)) |
| 1284 | (point)) | 1285 | (point)) |
| 1285 | (point))) | 1286 | (message "Paragraph being closed appears to contain a mismatch"))) |
| 1286 | (message "Paragraph being closed appears to contain a mismatch")) | ||
| 1287 | (insert "\n\n")) | ||
| 1288 | 1287 | ||
| 1289 | (define-skeleton tex-insert-braces | 1288 | (define-skeleton tex-insert-braces |
| 1290 | "Make a pair of braces and be poised to type inside of them." | 1289 | "Make a pair of braces and be poised to type inside of them." |