Changes committed gnus/lisp (ChangeLog gnus-sum.el)
"Lars Magne Ingebrigtsen" <[email protected]>
| Newsgroups | gmane.emacs.gnus.commits |
|---|---|
| Message-ID | <[email protected]> |
Modified: ChangeLog gnus-sum.el (gnus-propagate-marks): Rename variable to something more sensible. Index: ChangeLog diff -u gnus/lisp/ChangeLog:7.1842 gnus/lisp/ChangeLog:7.1843 --- ChangeLog:7.1842 Thu May 1 16:25:22 2008 +++ ChangeLog Thu May 1 16:26:34 2008 @@ -4,6 +4,7 @@ hooks. (gnus-update-read-articles): Speed up non-marks-using users. (gnus-use-marks): Define gnus-use-marks. + (gnus-propagate-marks): Rename variable to something more sensible. 2008-04-28 Teodor Zlatanov <[email protected]> Index: gnus-sum.el diff -u gnus/lisp/gnus-sum.el:7.223 gnus/lisp/gnus-sum.el:7.224 --- gnus-sum.el:7.223 Thu May 1 16:25:22 2008 +++ gnus-sum.el Thu May 1 16:26:34 2008 @@ -1208,7 +1208,7 @@ :type 'boolean :group 'gnus-summary-marks) -(defcustom gnus-use-marks t +(defcustom gnus-propagate-marks t "If non-nil, do not propagate marks to the backends." :version "21.1" :type 'boolean @@ -12161,7 +12161,7 @@ (save-excursion (let (setmarkundo) ;; Propagate the read marks to the backend. - (when (and gnus-use-marks + (when (and gnus-propagate-marks (gnus-check-backend-function 'request-set-mark group)) (let ((del (gnus-remove-from-range (gnus-info-read info) read)) (add (gnus-remove-from-range read (gnus-info-read info))))