Synch to No Gnus 200511080839.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 97897c8..53ccfad 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2005-11-08  Romain Francoise  <romain@orebokech.com>
+
+       * gnus-sum.el (gnus-summary-catchup-and-goto-prev-group): New function.
+       (gnus-summary-exit-map): Bind to `Z p'.
+       (gnus-summary-make-menu-bar): Add menu item.
+
 2005-11-02  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus-art.el (gnus-article-treat-custom): Add `first'.

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 38c559c..dbf4c86 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -1925,6 +1925,7 @@ increase the score of each group you read."
   "Q" gnus-summary-exit
   "Z" gnus-summary-exit
   "n" gnus-summary-catchup-and-goto-next-group
+  "p" gnus-summary-catchup-and-goto-prev-group
   "R" gnus-summary-reselect-current-group
   "G" gnus-summary-rescan-group
   "N" gnus-summary-next-group
@@ -2596,6 +2597,7 @@ gnus-summary-show-article-from-menu-as-charset-%s" cs))))
              '(:help "Mark unread articles in this group as read, then exit"))]
         ["Catchup all and exit" gnus-summary-catchup-all-and-exit t]
         ["Catchup and goto next" gnus-summary-catchup-and-goto-next-group t]
+        ["Catchup and goto prev" gnus-summary-catchup-and-goto-prev-group t]
         ["Exit group" gnus-summary-exit
          ,@(if (featurep 'xemacs) '(t)
              '(:help "Exit current group, return to group selection mode"))]
@@ -10662,6 +10664,15 @@ read."
     (gnus-summary-catchup all))
   (gnus-summary-next-group))
 
+(defun gnus-summary-catchup-and-goto-prev-group (&optional all)
+  "Mark all articles in this group as read and select the previous group.
+If given a prefix, mark all articles, unread as well as ticked, as
+read."
+  (interactive "P")
+  (save-excursion
+    (gnus-summary-catchup all))
+  (gnus-summary-next-group nil nil t))
+
 ;;;
 ;;; with article
 ;;;

diff --git a/texi/ChangeLog b/texi/ChangeLog
index 40a7dad..f8bcaf5 100644 (file)
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,3 +1,8 @@
+2005-11-08  Romain Francoise  <romain@orebokech.com>
+
+       * gnus.texi (Exiting the Summary Buffer): Add new function
+       `gnus-summary-catchup-and-goto-prev-group', bound to `Z p'.
+
 2005-11-08  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus.texi (XVarious): Revert description of gnus-use-toolbar.

diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi
index a527a9c..5dcd2c0 100644 (file)
--- a/texi/gnus-ja.texi
+++ b/texi/gnus-ja.texi
@@ -10011,6 +10011,12 @@ gnus \e$B$N\e(B info \e$B$N@a\e(B (node) \e$B$K0\F0$7$^$9\e(B (@code{gnus-info-find-no
 \e$B$9$Y$F$N5-;v$K4{FI$N0u$rIU$1$F<!$N%0%k!<%W$X0\F0$7$^\e(B
 \e$B$9\e(B (@code{gnus-summary-catchup-and-goto-next-group})\e$B!#\e(B
 
+@item Z p
+@kindex Z p (\e$B35N,\e(B)
+@findex gnus-summary-catchup-and-goto-prev-group
+\e$B$9$Y$F$N5-;v$K4{FI$N0u$rIU$1$FA0$N%0%k!<%W$X0\F0$7$^\e(B
+\e$B$9\e(B (@code{gnus-summary-catchup-and-goto-prev-group})\e$B!#\e(B
+
 @item Z R
 @itemx C-x C-s
 @kindex Z R (\e$B35N,\e(B)
@@ -22235,13 +22241,13 @@ Picon \e$B$N%U%!%$%kL>$H$7$F;n$7$F$_$k=g$KJB$Y$i$l$?3HD%;R$N%j%9%H$G$9!#%G%#\e(B
 @table @code
 @item gnus-use-toolbar
 @vindex gnus-use-toolbar
-\e$B%D!<%k%P!<$rI=<($7$J$$$N$J$i$P!"$3$NJQ?t$r\e(B @code{nil} \e$B$K@_Dj$7$F2<$5$$!#\e(B
-\e$B%D!<%k%P!<$r>e!"2<!"1&!"$^$?$O:8$KI=<($9$k$N$J$i$P!"$3$NJQ?t$r$=$l$>\e(B
-\e$B$l\e(B @code{top-toolbar}, @code{bottom-toolbar}, @code{right-toolbar}, \e$B$^$?\e(B
-\e$B$O\e(B @code{left-toolbar} \e$B$K@_Dj$7$F2<$5$$!#$3$NJQ?t$O\e(B XEmacs \e$B$K%D!<%k%P!<\e(B
-\e$B$r$I$&$d$C$FI=<($9$k$+$r;X<($9$k$?$a$N$b$N$G$O$J$/!"\e(BXEmacs \e$B$,%D!<%k%P!<\e(B
-\e$B$r$I$&$d$C$FI=<($9$k$+$r\e(B gnus \e$B$K8@$&$?$a$N$b$N$G$9!#%G%#%U%)%k%H\e(B
-\e$B$O\e(B @code{default-toolbar} \e$B$G$9!#\e(B
+@code{nil} \e$B$@$C$?$i%D!<%k%P!<$rI=<($7$^$;$s!#Hs\e(B-@code{nil} \e$B$N>l9g!"$=$l\e(B
+\e$B$O\e(B @code{default-toolbar}, @code{top-toolbar}, @code{bottom-toolbar},
+@code{right-toolbar} \e$B$^$?$O\e(B @code{left-toolbar} \e$B$NCf$N0l$D$G$J$1$l$P$J$j\e(B
+\e$B$^$;$s!#\e(B
+
+\e$BLuCm\e(B: \e$B8=:_$3$NJQ?t$K$h$k@)8f$OM-8z$G$O$"$j$^$;$s!#$+$D$F2~A1$,;n$_$i$l$^\e(B
+\e$B$7$?$,!":#$N$H$3$m2r7h$r8+$F$$$^$;$s!#\e(B
 
 @item gnus-group-toolbar
 @vindex gnus-group-toolbar

diff --git a/texi/gnus.texi b/texi/gnus.texi
index 142408d..66fddd0 100644 (file)
--- a/texi/gnus.texi
+++ b/texi/gnus.texi
@@ -10564,6 +10564,12 @@ Mark all articles, even the ticked ones, as read and then exit
 Mark all articles as read and go to the next group
 (@code{gnus-summary-catchup-and-goto-next-group}).
 
+@item Z p
+@kindex Z p (Summary)
+@findex gnus-summary-catchup-and-goto-prev-group
+Mark all articles as read and go to the previous group
+(@code{gnus-summary-catchup-and-goto-prev-group}).
+
 @item Z R
 @itemx C-x C-s
 @kindex Z R (Summary)