Commit 3a23a519 authored by Miles Bader's avatar Miles Bader
Browse files

Merge from gnus--devo--0

parent 38ac8b91
2008-05-01 Lars Magne Ingebrigtsen <>
* gnus.texi (Various Summary Stuff): Add gnus-propagate-marks.
(Various Summary Stuff): Fix typo in last xref.
2008-05-02 Juanma Barranquero <>
* org.texi (Moving subtrees): Fix typo.
......@@ -10763,6 +10763,13 @@ buffers. For example:
@end lisp
Also @pxref{Group Parameters}.
@vindex gnus-propagate-marks
@item gnus-propagate-marks
If non-@code{nil}, propagate marks to the backends for possible
storing. @xref{NNTP marks}, and friends, for a more fine-grained
@end table
2008-05-01 Lars Magne Ingebrigtsen <>
* gnus-sum.el (gnus-summary-save-parts): Inhibit even more treatment
(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-05-02 Juanma Barranquero <>
* gmm-utils.el (gmm, gmm-verbose, gmm-lazy, gmm-customize-mode)
......@@ -1208,6 +1208,12 @@ For example: ((1 . cn-gb-2312) (2 . big5))."
:type 'boolean
:group 'gnus-summary-marks)
(defcustom gnus-propagate-marks t
"If non-nil, do not propagate marks to the backends."
:version "21.1"
:type 'boolean
:group 'gnus-summary-marks)
(defcustom gnus-alter-articles-to-read-function nil
"Function to be called to alter the list of articles to be selected."
:type '(choice (const nil) function)
......@@ -11818,6 +11824,10 @@ If REVERSE, save parts that do not match TYPE."
(gnus-summary-iterate n
(let ((gnus-display-mime-function nil)
(gnus-inhibit-treatment t))
(with-current-buffer gnus-article-buffer
......@@ -12151,7 +12161,8 @@ UNREAD is a sorted list."
(let (setmarkundo)
;; Propagate the read marks to the backend.
(when (gnus-check-backend-function 'request-set-mark group)
(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))))
(when (or add del)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment