From 9da02ea1b0368a635d357a7e5a9a2e8c422beaa4 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 28 Jan 2011 02:07:48 +0000 Subject: [PATCH] gnus-int.el (gnus-request-marks): Call *-request-marks instead of the older request-update-info. --- lisp/gnus/ChangeLog | 3 +++ lisp/gnus/gnus-int.el | 3 +-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 29939cc165a..36175a174b6 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,8 @@ 2011-01-28 Lars Ingebrigtsen + * 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 diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el index 9f69536122a..a67063bb970 100644 --- 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 -- 2.39.5