From: Kevin Greiner Date: Fri, 1 Oct 2004 20:40:28 +0000 (+0000) Subject: * gnus-agent.el (gnus-agent-synchronize-group-flags): Fixed typo in preceeding check-in. X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=3618c97e61225f5edeb5d3734a339f0754c5d181;hp=bd3b503cbb2e598a80baf1ea66dc8824ad4712bc * gnus-agent.el (gnus-agent-synchronize-group-flags): Fixed typo in preceeding check-in. --- diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el index 9d48b59f2..e0f628a5d 100644 --- a/lisp/gnus-agent.el +++ b/lisp/gnus-agent.el @@ -1241,7 +1241,7 @@ This can be added to `gnus-select-article-hook' or ((memq mark '(tick)) (let ((info-marks (assoc mark (gnus-info-marks info)))) (unless info-marks - (gnus-info-marks info (cons (setq info-marks (list mark)) (gnus-info-marks info)))) + (gnus-info-set-marks info (cons (setq info-marks (list mark)) (gnus-info-marks info)))) (setcdr info-marks (funcall (if (eq what 'add) 'gnus-range-add 'gnus-remove-from-range)