[gnus git] branch master updated: m0-5-203-gcbe6e76 =1= Fix point movement when hiding threads
Lars Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via cbe6e76bf806b22879767af60fc37d26a8ae2af2 (commit)
from 759d1bb444f2ac7c9d9ccde166eb9fecfbdb959b (commit)
- Log -----------------------------------------------------------------
commit cbe6e76bf806b22879767af60fc37d26a8ae2af2
Author: Lars Ingebrigtsen <[email protected]>
Date: Mon Dec 24 17:08:55 2012 +0100
Fix point movement when hiding threads
* gnus-sum.el (gnus-summary-hide-thread): If point were further to the
right than four characters, this command would move point to
`point-max'. Don't do that.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb876d1..89b6c67 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
2012-12-24 Lars Ingebrigtsen <[email protected]>
+ * gnus-sum.el (gnus-summary-hide-thread): If point were further to the
+ right than four characters, this command would move point to
+ `point-max'. Don't do that.
+
* gnus-group.el (gnus-group-read-ephemeral-group): Set the active data
to nil to allow re-selecting groups that gain articles.
(gnus-bug-group-download-format-alist): Update the URL.
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 4b00e99..91f369b 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -11658,10 +11658,10 @@ If PREDICATE is supplied, threads that satisfy this predicate
will not be hidden.
Returns nil if no threads were there to be hidden."
(interactive)
+ (beginning-of-line)
(let ((start (point))
(starteol (line-end-position))
(article (gnus-summary-article-number)))
- (goto-char start)
;; Go forward until either the buffer ends or the subthread ends.
(when (and (not (eobp))
(or (zerop (gnus-summary-next-thread 1 t))
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 4 ++++
lisp/gnus-sum.el | 2 +-
2 files changed, 5 insertions(+), 1 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project