[gnus git] branch master updated: m0-7-294-g943f87c =2= Change last patch to Dave Abraham's original code to avoid warning ; * gnus-salt.el (gnus-tree-highlight-article): Don't move point around in the summary buffer (bug#13769).
Lars Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 943f87c54591fe35f994f600899bc031665da945 (commit)
via 6b656500ac7b130d544d4f4d7575f85dab89aaaa (commit)
from 8aa205d9bac6008fd7adbc35f5f1ef7594a0b551 (commit)
- Log -----------------------------------------------------------------
commit 943f87c54591fe35f994f600899bc031665da945
Author: Lars Ingebrigtsen <[email protected]>
Date: Thu Jan 30 16:27:02 2014 -0800
Change last patch to Dave Abraham's original code to avoid warning
diff --git a/lisp/gnus-salt.el b/lisp/gnus-salt.el
index a69c5b5..ce6bcd7 100644
--- a/lisp/gnus-salt.el
+++ b/lisp/gnus-salt.el
@@ -882,12 +882,12 @@ it in the environment specified by BINDINGS."
;; The save-excursion here is apparently necessary because
;; `set-window-point' somehow manages to alter the buffer position.
(save-excursion
- (set-buffer (gnus-get-tree-buffer))
+ (with-current-buffer (gnus-get-tree-buffer)
(let (region)
(when (setq region (gnus-tree-article-region article))
(gnus-put-text-property (car region) (cdr region) 'face face)
(set-window-point
- (gnus-get-buffer-window (current-buffer) t) (cdr region))))))
+ (gnus-get-buffer-window (current-buffer) t) (cdr region)))))))
;;; Allow redefinition of functions.
(gnus-ems-redefine)
commit 6b656500ac7b130d544d4f4d7575f85dab89aaaa
Author: Dave Abrahams <[email protected]>
Date: Thu Jan 30 16:24:24 2014 -0800
* gnus-salt.el (gnus-tree-highlight-article): Don't move point around
in the summary buffer (bug#13769).
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0d20dba..e2542dc 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2014-01-31 Dave Abrahams <[email protected]>
+
+ * gnus-salt.el (gnus-tree-highlight-article): Don't move point around
+ in the summary buffer (bug#13769).
+
2014-01-31 Lars Ingebrigtsen <[email protected]>
* gnus-art.el (gnus-article-setup-buffer): Refresh the summary buffer
diff --git a/lisp/gnus-salt.el b/lisp/gnus-salt.el
index ef45bae..a69c5b5 100644
--- a/lisp/gnus-salt.el
+++ b/lisp/gnus-salt.el
@@ -879,7 +879,10 @@ it in the environment specified by BINDINGS."
(set-buffer buf))))
(defun gnus-tree-highlight-article (article face)
- (with-current-buffer (gnus-get-tree-buffer)
+ ;; The save-excursion here is apparently necessary because
+ ;; `set-window-point' somehow manages to alter the buffer position.
+ (save-excursion
+ (set-buffer (gnus-get-tree-buffer))
(let (region)
(when (setq region (gnus-tree-article-region article))
(gnus-put-text-property (car region) (cdr region) 'face face)
-----------------------------------------------------------------------
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 | 5 +++++
lisp/gnus-salt.el | 15 +++++++++------
2 files changed, 14 insertions(+), 6 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