Feeding back from `t-gnus-6_14' into `pgnus-ichikawa'.

[elisp/gnus.git-] / lisp / mm-util.el

diff --git a/lisp/mm-util.el b/lisp/mm-util.el
index 2943680..8a0264b 100644 (file)
--- a/lisp/mm-util.el
+++ b/lisp/mm-util.el
@@ -25,6 +25,9 @@
 ;;; Code:
 
 (eval-when-compile (require 'cl))
+(eval-when-compile (require 'gnus-clfns))
+(eval-when-compile (require 'static))
+
 (require 'mail-prsvr)
 
 (defvar mm-mime-mule-charset-alist
@@ -437,7 +440,7 @@ Mule4 only."
                                       mm-mime-mule-charset-alist)))))
            (list 'ascii (or charset 'latin-iso8859-1)))))))))
 
-(if (fboundp 'shell-quote-argument)
+(static-if (fboundp 'shell-quote-argument)
     (defalias 'mm-quote-arg 'shell-quote-argument)
   (defun mm-quote-arg (arg)
     "Return a version of ARG that is safe to evaluate in a shell."