Mercurial > emacs
comparison lisp/mail/rmail.el @ 44141:264c168daeaa
(rmail-resend): Call mail-abbrev-make-syntax-table.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 25 Mar 2002 00:41:26 +0000 |
| parents | 5766d225ccf3 |
| children | 30db00c75dbf |
comparison
equal
deleted
inserted
replaced
| 44140:43143e459aae | 44141:264c168daeaa |
|---|---|
| 3346 (local-abbrev-table mail-abbrevs) | 3346 (local-abbrev-table mail-abbrevs) |
| 3347 (old-syntax-table (syntax-table))) | 3347 (old-syntax-table (syntax-table))) |
| 3348 (if (and (not (vectorp mail-abbrevs)) | 3348 (if (and (not (vectorp mail-abbrevs)) |
| 3349 (file-exists-p mail-personal-alias-file)) | 3349 (file-exists-p mail-personal-alias-file)) |
| 3350 (build-mail-abbrevs)) | 3350 (build-mail-abbrevs)) |
| 3351 (unless mail-abbrev-syntax-table | |
| 3352 (mail-abbrev-make-syntax-table)) | |
| 3351 (set-syntax-table mail-abbrev-syntax-table) | 3353 (set-syntax-table mail-abbrev-syntax-table) |
| 3352 (goto-char before) | 3354 (goto-char before) |
| 3353 (while (and (< (point) end) | 3355 (while (and (< (point) end) |
| 3354 (progn (forward-word 1) | 3356 (progn (forward-word 1) |
| 3355 (<= (point) end))) | 3357 (<= (point) end))) |