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-mark elmo-sendlog
  24    elmo-dop elmo-nmz elmo-split
  25    ))
  26
  27 \f
  28 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  29 ;;; Emacsen
  30 ;; (< 20 emacs-major-version) && !(featurep 'mule)
  31 (cond
  32  ((featurep 'xemacs)
  33   (setq WL-MODULES (append WL-MODULES (list 'wl-dnd 'wl-xmas)))
  34   (setq ELMO-MODULES (append (list 'elmo-database) ELMO-MODULES)))
  35  ((and (boundp 'emacs-major-version) (>= emacs-major-version 21))
  36   (setq WL-MODULES (append WL-MODULES (list 'wl-e21))))
  37  ((featurep 'mule)
  38   (setq WL-MODULES (append WL-MODULES (list 'wl-mule)))))
  39
  40 (defconst WL-AUTOLOAD-MODULES '(
  41    auto-autoloads custom-load
  42    ))
  43
  44 (if (or (fboundp 'dynamic-link)
  45         ;; static
  46         (fboundp 'open-database))
  47     (add-to-list 'ELMO-MODULES 'elmo-database))
  48
  49 (if (module-installed-p 'shimbun)
  50     (add-to-list 'ELMO-MODULES 'elmo-shimbun))
  51
  52 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  53 ;;; SEMI
  54
  55 (setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
  56 (setq ELMO-MODULES (append ELMO-MODULES (list 'elmo-mime)))
  57 (if (not (module-installed-p 'luna))
  58     (error "Use new FLIM & SEMI.  See INSTALL or INSTALL.ja"))
  59
  60 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  61 ;;; Utils
  62 (defvar UTILS-MODULES '(rfc2368 wl-mailto wl-addrbook wl-complete))
  63
  64 ;; OpenSSL/SSLeay package is also needed.
  65 (if (module-installed-p 'base64)
  66     (add-to-list 'UTILS-MODULES 'ssl))
  67
  68 (defvar modules-alist
  69   (list
  70    (cons ELMODIR ELMO-MODULES)
  71    (cons WLDIR WL-MODULES)
  72    (if (module-installed-p 'bbdb)
  73        (cons UTILSDIR (list 'bbdb-wl)))
  74    (if (exec-installed-p "imput")
  75        (cons UTILSDIR (list 'im-wl)))
  76    (if wl-install-utils
  77        (cons UTILSDIR UTILS-MODULES))))