;;; generic modules
(defconst WL-MODULES '(
wl wl-folder wl-summary wl-message
- wl-vars wl-draft wl-util wl-version wl-address
+ wl-vars wl-draft wl-util wl-version wl-address wl-addrmgr
wl-highlight wl-demo wl-refile wl-thread
- wl-fldmgr wl-expire wl-template wl-score
+ wl-fldmgr wl-expire wl-template wl-score wl-acap
))
(defconst ELMO-MODULES '(
- elmo-util elmo-version elmo-net elmo-imap4 elmo-nntp elmo-archive
- elmo-localdir elmo-msgdb elmo-vars elmo2
- elmo-cache elmo-multi elmo-filter elmo-pipe
- elmo-dop elmo-pop3 elmo-localnews elmo-maildir
- elmo-date elmo-internal utf7 pldap
+ utf7 pldap acap slp mmimap
+ elmo-date elmo-util elmo-version elmo-vars elmo elmo-msgdb
+ elmo-net elmo-imap4 elmo-pop3 elmo-nntp
+ elmo-localdir elmo-localnews elmo-map elmo-maildir
+ elmo-multi elmo-filter
+ elmo-archive elmo-pipe elmo-cache
+ elmo-internal elmo-mark elmo-sendlog
+ elmo-dop elmo-nmz
))
\f
((featurep 'xemacs)
(setq WL-MODULES (append WL-MODULES (list 'wl-dnd 'wl-xmas)))
(setq ELMO-MODULES (append (list 'elmo-database) ELMO-MODULES)))
- ((fboundp 'nemacs-version)
- (setq WL-MODULES (append WL-MODULES (list 'wl-nemacs))))
((and (boundp 'emacs-major-version) (>= emacs-major-version 21))
(setq WL-MODULES (append WL-MODULES (list 'wl-e21))))
((featurep 'mule)
))
(if (or (fboundp 'dynamic-link)
- ;; static
- (fboundp 'open-database))
+ ;; static
+ (fboundp 'open-database))
(add-to-list 'ELMO-MODULES 'elmo-database))
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;;; tm-8 / SEMI
+(if (module-installed-p 'shimbun)
+ (add-to-list 'ELMO-MODULES 'elmo-shimbun))
-(if (module-installed-p 'mime-view)
- (progn
- (defconst wl-use-semi t)
- (setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
- (setq ELMO-MODULES (append ELMO-MODULES (list 'mmelmo 'mmelmo-imap4))))
- (defconst wl-use-semi nil)
- (setq WL-MODULES (append WL-MODULES (list 'tm-wl))))
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;; SEMI
+(setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
+(setq ELMO-MODULES (append ELMO-MODULES (list 'elmo-mime)))
(if (not (module-installed-p 'luna))
- (if wl-use-semi
- (error "Use FLIM-1.13.2 or later and SEMI 1.13.7 or later.")
- (if (module-installed-p 'product)
- (error "Use tm-8.x with APEL 10.2 or later.")
- ;; tm but luna is not installed (tm7?)
- (error "Use tm-8.x."))))
+ (error "Use new FLIM & SEMI. See INSTALL or INSTALL.ja"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Utils
-(defvar UTILS-MODULES '(rfc2368 wl-mailto))
+(defvar UTILS-MODULES '(rfc2368 wl-mailto wl-addrbook wl-complete))
;; OpenSSL/SSLeay package is also needed.
(if (module-installed-p 'base64)
(add-to-list 'UTILS-MODULES 'ssl))
-(defconst SASL-MODULES '(hmac-def hmac-md5 hmac-sha1
- hex-util md5-dl md5-el md5
- sha1-dl sha1-el sha1 sasl
- scram-md5 digest-md5 unique-id))
-
(defvar modules-alist
(list
(cons ELMODIR ELMO-MODULES)
(if (exec-installed-p "imput")
(cons UTILSDIR (list 'im-wl)))
(if wl-install-utils
- (cons UTILSDIR UTILS-MODULES))
- ;; sasl does not work under Nemacs.
- (if (and wl-install-sasl
- (not (fboundp 'nemacs-version)))
- (cons SASLDIR SASL-MODULES))
- ))
+ (cons UTILSDIR UTILS-MODULES))))