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-message
  11    wl-vars wl-draft wl-util wl-version wl-address
  12    wl-highlight wl-demo wl-refile wl-thread
  13    wl-fldmgr wl-expire wl-template wl-score
  14    ))
  15
  16 (defconst ELMO-MODULES '(
  17    elmo-util elmo-version elmo-net elmo-imap4 elmo-nntp elmo-archive
  18    elmo-localdir elmo-msgdb elmo-vars elmo2
  19    elmo-cache elmo-multi elmo-filter elmo-pipe
  20    elmo-dop elmo-pop3 elmo-localnews elmo-maildir
  21    elmo-date elmo-internal utf7 pldap
  22    ))
  23
  24 \f
  25 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  26 ;;; Emacsen
  27 ;; (< 20 emacs-major-version) && !(featurep 'mule)
  28 (cond
  29  ((featurep 'xemacs)
  30   (setq WL-MODULES (append WL-MODULES (list 'wl-dnd 'wl-xmas)))
  31   (setq ELMO-MODULES (append (list 'elmo-database) ELMO-MODULES)))
  32  ((fboundp 'nemacs-version)
  33   (setq WL-MODULES (append WL-MODULES (list 'wl-nemacs))))
  34  ((and (boundp 'emacs-major-version) (>= emacs-major-version 21))
  35   (setq WL-MODULES (append WL-MODULES (list 'wl-e21))))
  36  ((featurep 'mule)
  37   (setq WL-MODULES (append WL-MODULES (list 'wl-mule)))))
  38
  39 (defconst WL-AUTOLOAD-MODULES '(
  40    auto-autoloads custom-load
  41    ))
  42
  43 (if (or (fboundp 'dynamic-link)
  44         ;; static
  45         (fboundp 'open-database))
  46     (add-to-list 'ELMO-MODULES 'elmo-database))
  47
  48 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  49 ;;; tm-8 / SEMI
  50
  51 (if (module-installed-p 'mime-view)
  52     (progn
  53       (defconst wl-use-semi t)
  54       (setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
  55       (setq ELMO-MODULES (append ELMO-MODULES (list 'mmelmo 'mmelmo-imap4))))
  56   (defconst wl-use-semi nil)
  57   (setq WL-MODULES (append WL-MODULES (list 'tm-wl)))
  58   )
  59
  60
  61 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  62 ;;; FLIM 1.12 / FLIM 1.13
  63 (cond
  64  ((module-installed-p 'luna)
  65   ;; FLIM 1.13 (SEMI/tm-8)
  66   (defconst wl-use-luna t)
  67   (setq ELMO-MODULES
  68         (append ELMO-MODULES
  69                 (list 'mmelmo-2
  70                       'mmelmo-imap4-2))))
  71  (wl-use-semi
  72   ;; FLIM 1.12
  73   (defconst wl-use-luna nil)
  74   (setq ELMO-MODULES
  75         (append ELMO-MODULES
  76                 (list 'mmelmo-1
  77                       'mmelmo-imap4-1))))
  78  )
  79
  80
  81 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  82 ;;; Utils
  83 (defvar UTILS-MODULES '(rfc2368 wl-mailto))
  84
  85 ;; OpenSSL/SSLeay package is also needed.
  86 (if (module-installed-p 'base64)
  87     (add-to-list 'UTILS-MODULES 'ssl))
  88
  89 (defconst SASL-MODULES '(hmac-def hmac-md5 hmac-sha1
  90                          hex-util md5-dl md5-el md5
  91                          sha1-dl sha1-el sha1 sasl
  92                          scram-md5 digest-md5 unique-id))
  93
  94 (defvar modules-alist
  95   (list
  96    (cons ELMODIR ELMO-MODULES)
  97    (cons WLDIR WL-MODULES)
  98    (if (module-installed-p 'bbdb)
  99        (cons UTILSDIR (list 'bbdb-wl)))
 100    (if (exec-installed-p "imput")
 101        (cons UTILSDIR (list 'im-wl)))
 102    (if wl-install-utils
 103        (cons UTILSDIR UTILS-MODULES))
 104    ;; sasl does not work under Nemacs.
 105    (if (and wl-install-sasl
 106             (not (fboundp 'nemacs-version)))
 107        (cons SASLDIR SASL-MODULES))
 108     ))