gnus-int.el (gnus-request-marks): Call *-request-marks instead of the older request...

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 29939cc165a7db490ed10c53a13b0b59e38e839b..36175a174b6eed215a21e3dd0468f19588da7905 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/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/gnus-int.el b/lisp/gnus/gnus-int.el
index 9f69536122a4d86eb75df325fbcbb238c45db7a4..a67063bb970fc7831f238d7c32395c3bac5b80eb 100644 (file)
--- a/lisp/gnus/gnus-int.el
+++ b/lisp/gnus/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