[gnus git] branch master updated: m0-1-47-g25246d0 =1= Make `backtab' in the summary buffer select the previous link

       via  25246d0a771bc52ce55f8f7f5ea3852a13f3430c (commit)
      from  c387d52af8371b1d4defdf23cc409ab6b21fb4eb (commit)


- Log -----------------------------------------------------------------
commit 25246d0a771bc52ce55f8f7f5ea3852a13f3430c
Author: Lars Ingebrigtsen <[email protected]>
Date:   Thu Feb 2 11:00:13 2012 +0100

    Make `backtab' in the summary buffer select the previous link
    
    * lisp/gnus-sum.el (gnus-summary-widget-backward): New function and
    keystroke.

diff --git a/GNUS-NEWS b/GNUS-NEWS
index 2b2059f..f7bcd56 100644
--- a/GNUS-NEWS
+++ b/GNUS-NEWS
@@ -17,6 +17,9 @@ For older news, see Gnus info node "New Features".
 
 ** shr has a new command `z' that cycles through image sizes.
    
+** `backtab' in the summary buffer now selects the previous link in
+   the article buffer.
+
 * For older news, see Gnus info node "New Features".
 
 ----------------------------------------------------------------------
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b34cccc..db71505 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2012-02-02  Lars Ingebrigtsen  <[email protected]>
 
+	* gnus-sum.el (gnus-summary-widget-backward): New function and
+	keystroke.
+
 	* gnus-compat.el: More the compat functions more compatible.
 
 	* shr.el (shr-put-image): Remove underlines from sliced images.
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index d0a582e..c04bf7a 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -1917,6 +1917,7 @@ increase the score of each group you read."
   "x" gnus-summary-limit-to-unread
   "s" gnus-summary-isearch-article
   [tab] gnus-summary-widget-forward
+  [backtab] gnus-summary-widget-backward
   "t" gnus-summary-toggle-header
   "g" gnus-summary-show-article
   "l" gnus-summary-goto-last-article
@@ -2081,6 +2082,7 @@ increase the score of each group you read."
   "g" gnus-summary-show-article
   "s" gnus-summary-isearch-article
   [tab] gnus-summary-widget-forward
+  [backtab] gnus-summary-widget-forward
   "P" gnus-summary-print-article
   "S" gnus-sticky-article
   "M" gnus-mailing-list-insinuate
@@ -9262,6 +9264,17 @@ With optional ARG, move across that many fields."
   (select-window (gnus-get-buffer-window gnus-article-buffer))
   (widget-forward arg))
 
+(defun gnus-summary-widget-backward (arg)
+  "Move point to the previous field or button in the article.
+With optional ARG, move across that many fields."
+  (interactive "p")
+  (gnus-summary-select-article)
+  (gnus-configure-windows 'article)
+  (select-window (gnus-get-buffer-window gnus-article-buffer))
+  (unless (widget-at (point))
+    (goto-char (point-max)))
+  (widget-backward arg))
+
 (defun gnus-summary-isearch-article (&optional regexp-p)
   "Do incremental search forward on the current article.
 If REGEXP-P (the prefix) is non-nil, do regexp isearch."

-----------------------------------------------------------------------
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:
 GNUS-NEWS        |    5 ++++-
 lisp/ChangeLog   |    3 +++
 lisp/gnus-sum.el |   13 +++++++++++++
 3 files changed, 20 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