Mercurial > emacs
comparison lisp/mail/rmail.el @ 88192:f2fae8754f34
(rmail-process-new-messages): Don't require rmailkwd
here, do it at toplevel instead.
| author | Henrik Enberg <henrik.enberg@telia.com> |
|---|---|
| date | Tue, 17 Jan 2006 21:33:12 +0000 |
| parents | e40931b9db5d |
| children | 1f1ae6ac5610 |
comparison
equal
deleted
inserted
replaced
| 88191:ce303d6c17eb | 88192:f2fae8754f34 |
|---|---|
| 44 (require 'mailabbrev) | 44 (require 'mailabbrev) |
| 45 (require 'mule-util)) ; for detect-coding-with-priority | 45 (require 'mule-util)) ; for detect-coding-with-priority |
| 46 | 46 |
| 47 (eval-and-compile | 47 (eval-and-compile |
| 48 (require 'rmaildesc) | 48 (require 'rmaildesc) |
| 49 (require 'rmailhdr)) | 49 (require 'rmailhdr) |
| 50 (require 'rmailkwd)) | |
| 50 | 51 |
| 51 (defvar deleted-head) | 52 (defvar deleted-head) |
| 52 (defvar font-lock-fontified) | 53 (defvar font-lock-fontified) |
| 53 (defvar mail-abbrev-syntax-table) | 54 (defvar mail-abbrev-syntax-table) |
| 54 (defvar mail-abbrevs) | 55 (defvar mail-abbrevs) |
| 1999 ;; comma separated list and returned as a list of strings. | 2000 ;; comma separated list and returned as a list of strings. |
| 2000 (setq keywords (rmail-header-get-keywords)) | 2001 (setq keywords (rmail-header-get-keywords)) |
| 2001 (when keywords | 2002 (when keywords |
| 2002 ;; Keywords do exist. Register them with the keyword | 2003 ;; Keywords do exist. Register them with the keyword |
| 2003 ;; management library. | 2004 ;; management library. |
| 2004 (require 'rmailkwd) | |
| 2005 (rmail-keyword-register-keywords keywords)) | 2005 (rmail-keyword-register-keywords keywords)) |
| 2006 | 2006 |
| 2007 ;; Insure that we have From and Date headers. | 2007 ;; Insure that we have From and Date headers. |
| 2008 ;;(rmail-decode-from-line) | 2008 ;;(rmail-decode-from-line) |
| 2009 | 2009 |