Disable the async code for now, since it doesn't work for all users.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 47df2e0..0a90892 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-02-09  Lars Ingebrigtsen  <larsi@gnus.org>
+
+       * nntp.el (nntp-retrieve-group-data-early-disabled): Disable the async
+       code for now, since it doesn't work for all users.
+
 2011-02-09  Julien Danjou  <julien@danjou.info>
 
        * message.el (message-options): Make message-options really buffer

diff --git a/lisp/nntp.el b/lisp/nntp.el
index 0e009b2..eb2dd00 100644 (file)
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -774,7 +774,7 @@ command whose response triggered the error."
         (nntp-copy-to-buffer nntp-server-buffer (point-min) (point-max))
          'headers)))))
 
-(deffoo nntp-retrieve-group-data-early (server infos)
+(deffoo nntp-retrieve-group-data-early-disabled (server infos)
   "Retrieve group info on INFOS."
   (nntp-with-open-group nil server
     (when (nntp-find-connection-buffer nntp-server-buffer)
@@ -793,7 +793,7 @@ command whose response triggered the error."
             nil command (gnus-group-real-name (gnus-info-group info)))))
        (length infos)))))
 
-(deffoo nntp-finish-retrieve-group-infos (server infos count)
+(deffoo nntp-finish-retrieve-group-infos-disabled (server infos count)
   (nntp-with-open-group nil server
     (let ((buf (nntp-find-connection-buffer nntp-server-buffer))
          (method (gnus-find-method-for-group