30 |
;;; Code: |
;;; Code: |
31 |
|
|
32 |
(eval-when-compile (require 'cl)) |
(eval-when-compile (require 'cl)) |
|
;; Don't require CL at runtime if we can avoid it (Emacs 21). |
|
|
;; Otherwise we need it for hashing functions. `puthash' was never |
|
|
;; defined in the Emacs 20 cl.el for some reason. |
|
|
(if (fboundp 'puthash) |
|
|
nil ; internal or CL is loaded |
|
|
(defalias 'puthash 'cl-puthash) |
|
|
(autoload 'cl-puthash "cl") |
|
|
(autoload 'gethash "cl") |
|
|
(autoload 'maphash "cl") |
|
|
(autoload 'make-hash-table "cl")) |
|
33 |
|
|
34 |
(eval-when-compile |
(eval-when-compile |
35 |
(require 'mm-decode) |
(require 'mm-decode) |