(mm-uu-decode-function)

(mm-uu-binhex-decode-function): Defvar when compiling.

diff --git a/lisp/gnus/mm-bodies.el b/lisp/gnus/mm-bodies.el
index 597306cc8c84600d4f76a0db586bf1cd22679397..bd72accceaa0c80b1d8dee785ff513e3b0a66fbd 100644 (file)
--- a/lisp/gnus/mm-bodies.el
+++ b/lisp/gnus/mm-bodies.el
@@ -28,9 +28,9 @@
   (or (fboundp  'base64-decode-region)
       (require 'base64)))
 
-;; This leads to a recursive load.
-;;(eval-when-compile
-;;  (require 'mm-uu))
+(eval-when-compile
+  (defvar mm-uu-decode-function)
+  (defvar mm-uu-binhex-decode-function))
 
 (require 'mm-util)
 (require 'rfc2047)