(gnus-request-marks): Call *-request-marks instead of the older request-update-info.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d27a904..3cef836 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2011-01-28  Lars Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-int.el (gnus-request-marks): Call *-request-marks instead of the
+       older request-update-info.
+
        * gnus-art.el (article-make-date-line): Limit the length a bit more.
 
 2011-01-28  Daiki Ueno  <ueno@unixuser.org>

diff --git a/lisp/gnus-int.el b/lisp/gnus-int.el
index 9f69536..a67063b 100644 (file)
--- a/lisp/gnus-int.el
+++ b/lisp/gnus-int.el
@@ -638,8 +638,7 @@ If GROUP is nil, all groups on GNUS-COMMAND-METHOD are scanned."
   (when (gnus-check-backend-function
         'request-marks (car gnus-command-method))
     (let ((group (gnus-info-group info)))
-      (and (funcall (gnus-get-function gnus-command-method
-                                      'request-update-info)
+      (and (funcall (gnus-get-function gnus-command-method 'request-marks)
                    (gnus-group-real-name group)
                    info (nth 1 gnus-command-method))
           ;; If the minimum article number is greater than 1, then all