Sync with deisui-1_14_0-2000-12-14.
[elisp/flim.git] / FLIM-ELS
1 ;;; -*-Emacs-Lisp-*-
2
3 ;; FLIM-ELS: list of FLIM modules to install
4
5 ;;; Code:
6
7 (setq flim-modules '(std11
8                      luna lunit mime-def
9                      mel mel-q mel-u mel-g
10                      eword-decode eword-encode
11                      mime mime-parse mmgeneric
12                      mmbuffer mmcooked mmdbuffer mmexternal
13                      mime-conf
14                      sasl sasl-cram sasl-digest
15                      smtp qmtp smtpmail))
16
17 (setq flim-version-specific-modules '(mailcap))
18
19 (setq hmac-modules '(hex-util
20                      hmac-def md5 sha1
21                      hmac-md5 hmac-sha1))
22
23 (if (and (fboundp 'base64-encode-string)
24          (subrp (symbol-function 'base64-encode-string)))
25     nil
26   (if (fboundp 'dynamic-link)
27       (setq flim-modules (cons 'mel-b-dl flim-modules)))
28   (setq flim-modules (cons 'mel-b-el flim-modules)))
29
30 (require 'pccl)
31 (unless-broken ccl-usable
32   (setq flim-modules (cons 'mel-b-ccl (cons 'mel-q-ccl flim-modules))))
33
34 (if (and (fboundp 'md5)
35          (subrp (symbol-function 'md5)))
36     nil
37   (if (fboundp 'dynamic-link)
38       (setq hmac-modules (cons 'md5-dl hmac-modules))
39     (setq hmac-modules (cons 'md5-el hmac-modules))))
40
41 (if (fboundp 'dynamic-link)
42     (setq hmac-modules (cons 'sha1-dl hmac-modules))
43   (setq hmac-modules (cons 'sha1-el hmac-modules)))
44
45 (setq flim-modules (nconc hmac-modules flim-modules))
46
47 ;;; FLIM-ELS ends here