Mercurial > emacs
comparison lisp/mail/sendmail.el @ 9483:a8f745eaee5c
* sendmail.el: (mail-mode): Set font-lock-defaults.
| author | Simon Marshall <simon@gnu.org> |
|---|---|
| date | Wed, 12 Oct 1994 09:10:05 +0000 |
| parents | ce0b3e3021bf |
| children | 48a47a2673a5 |
comparison
equal
deleted
inserted
replaced
| 9482:7330d8566c13 | 9483:a8f745eaee5c |
|---|---|
| 262 (use-local-map mail-mode-map) | 262 (use-local-map mail-mode-map) |
| 263 (setq local-abbrev-table text-mode-abbrev-table) | 263 (setq local-abbrev-table text-mode-abbrev-table) |
| 264 (setq major-mode 'mail-mode) | 264 (setq major-mode 'mail-mode) |
| 265 (setq mode-name "Mail") | 265 (setq mode-name "Mail") |
| 266 (setq buffer-offer-save t) | 266 (setq buffer-offer-save t) |
| 267 (make-local-variable 'font-lock-keywords) | 267 (make-local-variable 'font-lock-defaults) |
| 268 (setq font-lock-keywords mail-font-lock-keywords) | 268 (setq font-lock-defaults '(mail-font-lock-keywords t)) |
| 269 (make-local-variable 'paragraph-separate) | 269 (make-local-variable 'paragraph-separate) |
| 270 (make-local-variable 'paragraph-start) | 270 (make-local-variable 'paragraph-start) |
| 271 (setq paragraph-start (concat "^" mail-header-separator | 271 (setq paragraph-start (concat "^" mail-header-separator |
| 272 "$\\|^[ \t]*[-_][-_][-_]+$\\|" | 272 "$\\|^[ \t]*[-_][-_][-_]+$\\|" |
| 273 paragraph-start)) | 273 paragraph-start)) |