* wl-score.el (wl-score-headers): Don't use
[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    ))
15
16 (defconst ELMO-MODULES '(
17    utf7 pldap acap slp mmimap
18    elmo-date elmo-util elmo-version elmo-vars elmo elmo-msgdb
19    elmo-net elmo-imap4 elmo-pop3 elmo-nntp
20    elmo-localdir elmo-localnews elmo-map elmo-maildir
21    elmo-multi elmo-filter
22    elmo-archive elmo-pipe elmo-cache
23    elmo-internal elmo-flag elmo-sendlog
24    elmo-dop elmo-nmz elmo-split
25    modb modb-entity modb-legacy modb-standard
26    ))
27
28 \f
29 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
30 ;;; Emacsen
31 ;; (< 20 emacs-major-version) && !(featurep 'mule)
32 (cond
33  ((featurep 'xemacs)
34   (setq WL-MODULES (append WL-MODULES (list 'wl-dnd 'wl-xmas)))
35   (setq ELMO-MODULES (append (list 'elmo-database) ELMO-MODULES)))
36  ((and (boundp 'emacs-major-version) (>= emacs-major-version 21))
37   (setq WL-MODULES (append WL-MODULES (list 'wl-e21))))
38  ((featurep 'mule)
39   (setq WL-MODULES (append WL-MODULES (list 'wl-mule)))))
40
41 (defconst WL-AUTOLOAD-MODULES '(
42    auto-autoloads custom-load
43    ))
44
45 (if (or (fboundp 'dynamic-link)
46         ;; static
47         (fboundp 'open-database))
48     (add-to-list 'ELMO-MODULES 'elmo-database))
49
50 (if (module-installed-p 'shimbun)
51     (add-to-list 'ELMO-MODULES 'elmo-shimbun))
52
53 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
54 ;;; SEMI
55
56 (setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
57 (setq ELMO-MODULES (append ELMO-MODULES (list 'elmo-mime)))
58 (if (not (module-installed-p 'luna))
59     (error "Use new FLIM & SEMI.  See INSTALL or INSTALL.ja"))
60
61 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
62 ;;; Utils
63 (defvar UTILS-MODULES '(rfc2368 wl-mailto wl-addrbook wl-complete))
64
65 ;; OpenSSL/SSLeay package is also needed.
66 (if (module-installed-p 'base64)
67     (add-to-list 'UTILS-MODULES 'ssl))
68
69 (defvar modules-alist
70   (list
71    (cons ELMODIR ELMO-MODULES)
72    (cons WLDIR WL-MODULES)
73    (if (module-installed-p 'bbdb)
74        (cons UTILSDIR (list 'bbdb-wl)))
75    (if (exec-installed-p "imput")
76        (cons UTILSDIR (list 'im-wl)))
77    (if wl-install-utils
78        (cons UTILSDIR UTILS-MODULES))))