X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=blobdiff_plain;f=lisp%2Fgnus-art.el;h=32399e1586fda04265e2f304042efe0b309ca538;hp=2839a603a9a27d4378ee1ac09101bd9bfb6698d3;hb=a10e061d0e6d4792608c61659d34a0c770c1129b;hpb=e9cbcce5e08949322618dfaa89494d3905e3486b

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 2839a603a..32399e158 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -4582,6 +4582,10 @@ commands:
     (when (eq (elt timer 5) 'image-animate-timeout)
       (cancel-timer timer))))
 
+(defun gnus-stop-downloads ()
+  (when (boundp 'url-queue)
+    (set (intern "url-queue" obarray) 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)