diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2016-02-07 17:56:59 +1100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2016-02-07 17:56:59 +1100 |
| commit | cc419fb599ac4d74ffc00e5c4c26e75009ac4911 (patch) | |
| tree | 2a51d482f14156ceadb1790534596b1e9e8cf932 /lisp/gnus/gnus-uu.el | |
| parent | 51c77a27f1b5213ca190f25cd68135e3b5bb2c20 (diff) | |
| download | emacs-cc419fb599ac4d74ffc00e5c4c26e75009ac4911.tar.gz emacs-cc419fb599ac4d74ffc00e5c4c26e75009ac4911.tar.bz2 emacs-cc419fb599ac4d74ffc00e5c4c26e75009ac4911.zip | |
Don't inloop gnus-uu-mark-thread on the last thread
* lisp/gnus/gnus-uu.el (gnus-uu-mark-thread): Don't infloop on the
final thread in the summary buffer (bug#16666).
Diffstat (limited to 'lisp/gnus/gnus-uu.el')
| -rw-r--r-- | lisp/gnus/gnus-uu.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-uu.el b/lisp/gnus/gnus-uu.el index 83f817fd8e9..416567ed285 100644 --- a/lisp/gnus/gnus-uu.el +++ b/lisp/gnus/gnus-uu.el @@ -641,9 +641,9 @@ When called interactively, prompt for REGEXP." (interactive) (gnus-save-hidden-threads (let ((level (gnus-summary-thread-level))) - (while (and (gnus-summary-set-process-mark - (gnus-summary-article-number)) + (while (and (gnus-summary-set-process-mark (gnus-summary-article-number)) (zerop (forward-line 1)) + (not (eobp)) (> (gnus-summary-thread-level) level))))) (gnus-summary-position-point)) |