X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fgnus-art.el;h=73058391e39e9db667c9b620412d5fe380823ff1;hb=00fc1a5640e0a12f79ee255378b431dc004421c7;hp=2839a603a9a27d4378ee1ac09101bd9bfb6698d3;hpb=16b9dfbbeff811d8e55e60005d91e350103702a3;p=gnus

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 2839a603a..73058391e 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -45,6 +45,7 @@
 (require 'mm-uu)
 (require 'message)
 (require 'mouse)
+(require 'url-queue)
 
 (autoload 'gnus-msg-mail "gnus-msg" nil t)
 (autoload 'gnus-button-mailto "gnus-msg")
@@ -4582,6 +4583,9 @@ commands:
     (when (eq (elt timer 5) 'image-animate-timeout)
       (cancel-timer timer))))
 
+(defun gnus-stop-downloads ()
+  (setq url-queue nil))
+
 ;; Set article window start at LINE, where LINE is the number of lines
 ;; from the head of the article.
 (defun gnus-article-set-window-start (&optional line)