(elmo-message-field): Define.
[elisp/wanderlust.git] / WL-ELS
1 ;;; WL-ELS  -*-Emacs-Lisp-*-
2
3 ;;;;;;;;;;;;;;;;;;;;;   DO NOT EDIT THIS FILE   ;;;;;;;;;;;;;;;;;;;;;
4 ;;;;;;;;;;;;;;;;;;;;;     INTERNAL USE ONLY     ;;;;;;;;;;;;;;;;;;;;;
5
6
7 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
8 ;;; generic modules
9 (defconst WL-MODULES '(
10    wl wl-folder wl-summary wl-action wl-message
11    wl-vars wl-draft wl-util wl-version wl-address wl-addrmgr
12    wl-highlight wl-demo wl-refile wl-thread
13    wl-fldmgr wl-expire wl-template wl-score wl-acap wl-news
14    wl-spam wl-batch
15    ))
16
17 (defconst ELMO-MODULES '(
18    utf7 pldap acap slp mmimap
19    elmo-date elmo-util elmo-version elmo-vars elmo elmo-msgdb
20    elmo-net elmo-imap4 elmo-pop3 elmo-nntp
21    elmo-localdir elmo-localnews elmo-map elmo-maildir
22    elmo-multi elmo-filter
23    elmo-archive elmo-pipe elmo-cache
24    elmo-internal elmo-flag elmo-sendlog
25    elmo-dop elmo-nmz elmo-file elmo-split
26    elmo-spam elsp-bogofilter elsp-sa elsp-bsfilter elsp-spamoracle
27    modb modb-entity modb-legacy modb-standard
28    ))
29
30 \f
31 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
32 ;;; Emacsen
33 ;; (< 20 emacs-major-version) && !(featurep 'mule)
34 (cond
35  ((featurep 'xemacs)
36   (setq WL-MODULES (append WL-MODULES (list 'wl-dnd 'wl-xmas)))
37   (setq ELMO-MODULES (append (list 'elmo-database) ELMO-MODULES)))
38  ((and (boundp 'emacs-major-version) (>= emacs-major-version 21))
39   (setq WL-MODULES (append WL-MODULES (list 'wl-e21))))
40  ((featurep 'mule)
41   (setq WL-MODULES (append WL-MODULES (list 'wl-mule)))))
42
43 (defconst WL-AUTOLOAD-MODULES '(
44    auto-autoloads custom-load
45    ))
46
47 (if (or (fboundp 'dynamic-link)
48         ;; static
49         (fboundp 'open-database))
50     (add-to-list 'ELMO-MODULES 'elmo-database))
51
52 (if (module-installed-p 'shimbun)
53     (add-to-list 'ELMO-MODULES 'elmo-shimbun))
54
55 (if (module-installed-p 'spamfilter)
56     (add-to-list 'ELMO-MODULES 'elsp-spamfilter))
57
58 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
59 ;;; SEMI
60
61 (setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
62 (setq ELMO-MODULES (append ELMO-MODULES (list 'elmo-mime)))
63 (if (not (module-installed-p 'luna))
64     (error "Use new FLIM & SEMI.  See INSTALL or INSTALL.ja"))
65
66 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
67 ;;; Utils
68 (defvar UTILS-MODULES '(rfc2368 im-wl wl-mailto wl-addrbook wl-complete))
69
70 ;; OpenSSL/SSLeay package is also needed.
71 (if (module-installed-p 'base64)
72     (add-to-list 'UTILS-MODULES 'ssl))
73
74 (defvar modules-alist
75   (list
76    (cons ELMODIR ELMO-MODULES)
77    (cons WLDIR WL-MODULES)
78    (if (module-installed-p 'bbdb)
79        (cons UTILSDIR (list 'bbdb-wl)))
80    (if wl-install-utils
81        (cons UTILSDIR UTILS-MODULES))))