# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1288575947 25200
# Node ID 8bf30c3cb442c1eb65bde3ea634da793ef799a45
# Parent  416f27744f244f62a11a32fc28533e8a01c307ba
Silence mm-decode.el compilation.
* lisp/gnus/mm-decode.el (gnus-completing-read, gnus-blocked-images): Autoload.

diff -r 416f27744f24 -r 8bf30c3cb442 lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Sun Oct 31 18:40:12 2010 -0700
+++ b/lisp/gnus/ChangeLog	Sun Oct 31 18:45:47 2010 -0700
@@ -1,5 +1,7 @@
 2010-11-01  Glenn Morris  <rgm@gnu.org>
 
+	* mm-decode.el (gnus-completing-read, gnus-blocked-images): Autoload.
+
 	* gnus.el (gnus-sloppily-equal-method-parameters): Move defn before use.
 
 	* sieve-manage.el: Require 'cl when compiling.
diff -r 416f27744f24 -r 8bf30c3cb442 lisp/gnus/mm-decode.el
--- a/lisp/gnus/mm-decode.el	Sun Oct 31 18:40:12 2010 -0700
+++ b/lisp/gnus/mm-decode.el	Sun Oct 31 18:45:47 2010 -0700
@@ -1,7 +1,7 @@
 ;;; mm-decode.el --- Functions for decoding MIME things
 
-;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+;;   2007, 2008, 2009, 2010  Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;;	MORIOKA Tomohiko <morioka@jaist.ac.jp>
@@ -1324,6 +1324,8 @@
       (let ((coding-system-for-write 'binary))
 	(shell-command-on-region (point-min) (point-max) command nil)))))
 
+(autoload 'gnus-completing-read "gnus-util")
+
 (defun mm-interactively-view-part (handle)
   "Display HANDLE using METHOD."
   (let* ((type (mm-handle-media-type handle))
@@ -1683,6 +1685,7 @@
 		  (start end &optional base-url))
 (declare-function shr-insert-document "shr" (dom))
 (defvar shr-blocked-images)
+(autoload 'gnus-blocked-images "gnus-art")
 
 (defun mm-shr (handle)
   ;; Require since we bind its variables.