Synch with Oort Gnus.
authoryamaoka <yamaoka>
Mon, 8 Jan 2001 23:36:14 +0000 (23:36 +0000)
committeryamaoka <yamaoka>
Mon, 8 Jan 2001 23:36:14 +0000 (23:36 +0000)
lisp/ChangeLog
lisp/gnus-agent.el
lisp/pop3.el
texi/ChangeLog
texi/gnus-ja.texi
texi/gnus.texi

index 3f08584..a5e578a 100644 (file)
@@ -1,5 +1,12 @@
+2001-01-08 09:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * pop3.el (pop3-get-message-count): Andrew Innes
+       <andrewi@gnu.org>'s patch of 1999-12-01 was not fully committed.
+
 2001-01-05 06:49:37  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-agent.el (gnus-agent-fetch-session): Say what we quit.
+
        * time-date.el (time-to-number-of-days): New function.
 
 2001-01-04 11:06:14  Gregory Chernov  <greg@visiontech-dml.com>
@@ -84,7 +91,7 @@
        * nnfolder.el (nnfolder-existing-articles): Reversed, i.e. sorted.
        (nnfolder-request-expire-articles): Use gnus-sorted-intersection.
        (nnfolder-retrieve-headers): Use intersection. Suggested by Jonas
-       Kvarnstr\e,Av\e(Bm <jonkv@ida.liu.se>.
+       Kvarnstr\81\e,Av\e(Bm <jonkv@ida.liu.se>.
 
 2000-12-30 00:17:38  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 
        * message.el (message-forward): Save-restriction.
 
-2000-12-21  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+2000-12-21  Kai Gro\81\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
 
        * gnus-art.el (article-treat-dumbquotes): More doc, provided by
        Paul Stevenson <p.stevenson@surrey.ac.uk>
        * message.el (message-font-lock-keywords): use
        message-cite-prefix-regexp.
 
-2000-11-15  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+2000-11-15  Kai Gro\81\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
 
        * gnus-group.el (gnus-group-jump-to-group-prompt): New variable by
-       Stein Arild Str\e,Ax\e(Bmme.
+       Stein Arild Str\81\e,Ax\e(Bmme.
        (gnus-group-jump-to-group): Use it.
        (gnus-group-jump-to-group-prompt): Customize.
 
        * gnus-art.el (gnus-mime-display-alternative): Show button if no
        preferred part.
 
-2000-11-07  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+2000-11-07  Kai Gro\81\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
 
        * gnus-sum.el (gnus-move-split-methods): Say that
        `gnus-split-methods' uses file names, whereas this uses group
index fd5f269..0d59ee0 100644 (file)
@@ -1109,7 +1109,8 @@ the actual number of articles toggled is returned."
             (error "Cannot fetch articles into the Gnus agent.")))
          (quit 
           (unless (funcall gnus-agent-confirmation-function
-                           (format "Quit (%s).  Continue? " err))
+                           (format "Quit fetching session (%s).  Continue? "
+                                   err))
             (signal 'quit "Cannot fetch articles into the Gnus agent."))))
        (pop methods))
       (gnus-message 6 "Finished fetching articles into the Gnus agent"))))
index 0d898db..b8bc546 100644 (file)
@@ -162,6 +162,28 @@ Nil means no, t means yes, not-nil-or-t means yet to be determined.")
     (kill-buffer crashbuf)
     message-count))
 
+(defun pop3-get-message-count ()
+  "Return the number of messages in the maildrop."
+  (let* ((process (pop3-open-server pop3-mailhost pop3-port))
+        message-count
+        (pop3-password pop3-password)
+        )
+    ;; for debugging only
+    (if pop3-debug (switch-to-buffer (process-buffer process)))
+    ;; query for password
+    (if (and pop3-password-required (not pop3-password))
+       (setq pop3-password
+             (pop3-read-passwd (format "Password for %s: " pop3-maildrop))))
+    (cond ((equal 'apop pop3-authentication-scheme)
+          (pop3-apop process pop3-maildrop))
+         ((equal 'pass pop3-authentication-scheme)
+          (pop3-user process pop3-maildrop)
+          (pop3-pass process))
+         (t (error "Invalid POP3 authentication scheme.")))
+    (setq message-count (car (pop3-stat process)))
+    (pop3-quit process)
+    message-count))
+
 (defun pop3-open-server (mailhost port)
   "Open TCP connection to MAILHOST on PORT.
 Returns the process associated with the connection.
index 3f9c590..30283c0 100644 (file)
@@ -1,3 +1,15 @@
+2001-01-07 18:18:53  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus.texi (myself): Quote .
+
+2001-01-05  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+
+       * gnus.texi (Choosing Commands): Add xref for redisplaying the
+       group.  Suggestion from Galen Boyer <galenboyer@yahoo.com>.
+       (The Summary Buffer): Mention reselecting the current group in the
+       menu.  Suggestion from Galen Boyer <galenboyer@yahoo.com>.
+       (Followups To Yourself): Add Lisp example.
+
 2001-01-05 06:53:13  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * emacs-mime.texi (time-date): Addition.
index 7501e41..7718c0e 100644 (file)
@@ -563,7 +563,8 @@ The Summary Buffer
 * Mail Group Commands::        \e$B$$$/$D$+$NL?Na$O%a!<%k%0%k!<%W$@$1$G;H$&\e(B
                                \e$B$3$H$,$G$-$k\e(B
 * Various Summary Stuff::      \e$BB>$N$I$N>l=j$K$b9g$o$J$+$C$?$b$N\e(B
-* Exiting the Summary Buffer:: \e$B%0%k!<%W%P%C%U%!$KLa$k\e(B
+* Exiting the Summary Buffer:: \e$B%0%k!<%W%P%C%U%!$KLa$k!"\e(B
+                               \e$B$^$?$O8=:_$N%0%k!<%W$r:F$SA*Br$9$k\e(B
 * Crosspost Handling::         \e$B%/%m%9%]%9%H$5$l$?5-;v$,$I$N$h$&$K07$o$l$k$+\e(B
 * Duplicate Suppression::      \e$B%/%m%9%]%9%H$N07$$$K<:GT$7$?$H$-$NBeBX<jCJ\e(B
 @c * Security::                    Decrypt and Verify.
@@ -4334,6 +4335,9 @@ Gnus \e$B$,<!$N%0%k!<%W$K0\F0$9$k$3$H$r3NG'$r$9$k$?$a$K!"%-!<$r2!$9$3$H$rMW\e(B
 \e$B0J2<$N0\F0%3%^%s%I$O$I$l$b?tCM@\F,0z?t$r<u$1IU$1$:!"5-;v$rA*Br$7!"I=<($7\e(B
 \e$B$^$9!#\e(B
 
+\e$B?7$7$$5-;v$r<h$j9~$s$@$j!"%0%k!<%W$r:FI=<($7$?$$$H$-$O\e(B @ref{Exiting the
+Summary Buffer} \e$B$r;2>H$7$F2<$5$$!#\e(B
+
 @table @kbd
 @item SPACE
 @kindex SPACE (\e$B35N,\e(B)
@@ -15769,7 +15773,10 @@ Gnus \e$B$O8=:_$N%P%C%U%!!<$+$i\e(B @code{Message-ID} \e$B%X%C%@!<$r8+$D$1=P$9$?$a$
 
 @vindex message-sent-hook
 \e$B$3$l$iFs$D$N4X?t$O!"4pK\E*$K$O$I$A$i$b\e(B @code{message-sent-hook} \e$B$N$h$&$J\e(B
-\e$B%U%C%/$NCf$G;H$&$?$a$N$b$N$G$9!#\e(B
+\e$B%U%C%/$NCf$G;H$&$?$a$N$b$N$G$9!#Nc$($P$3$N$h$&$K\e(B:
+@lisp
+(add-hook 'message-sent-hook 'gnus-score-followup-thread)
+@end lisp
 
 \e$B$"$J$?$N<+J,$N\e(B @code{Message-ID} \e$B$r$8$C$/$j$HD/$a$F$_$k$H!"$O$8$a$NFs!"\e(B
 \e$B;0J8;z$O>o$KF1$8$G$"$k$3$H$K5$$,$D$/$G$7$g$&!#0J2<$NFs$D$O;d$N$b$N$G$9!#\e(B
@@ -15785,7 +15792,7 @@ Gnus \e$B$O8=:_$N%P%C%U%!!<$+$i\e(B @code{Message-ID} \e$B%X%C%@!<$r8+$D$1=P$9$?$a$
 
 @lisp
 ("references"
- ("<x6[0-9a-z]+\\.fsf\\(_-_\\)?@@.*eyesore.no>"
+ ("<x6[0-9a-z]+\\.fsf\\(_-_\\)?@@.*eyesore\\.no>"
   1000 nil r))
 @end lisp
 
@@ -18341,12 +18348,14 @@ but at the common table.@*
 \e$B$K\e(B (99 \e$B%j%j!<%9$H\e(B CVS \e$B%j%]%8%H%j$G$N:n6H$N8e\e(B) ``Gnus 5.8'' \e$B$H$7$F%j%j!<\e(B
 \e$B%9$5$l$^$7$?!#\e(B
 
+2000\e$BG/\e(B10\e$B7n\e(B26\e$BF|$K\e(B Oort Gnus \e$B$,3+;O$5$l$^$7$?!#\e(B
+
 \e$B$b$7@\F,<-$r;}$C$?HG$N\e(B Gnus -- ``(ding) Gnus'', ``September Gnus'',
-``Red Gnus'', ``Quassia Gnus'' -- \e$B$K=P2q$C$F$b!":.Mp$7$J$$$G$/$@$5$$!#$"\e(B
-\e$B$J$?$,62$,$C$F$$$k;v$rCN$i$l$F$O$$$1$^$;$s!#8e$m$K2<$,$j$J$5$$!#$f$C$/$j\e(B
-\e$B$H!#B>$K2?$r$7$F$b!"Av$C$F$O$$$1$^$;$s!#$=$l$,FO$+$/$J$k$^$G!"@E$+$KJb$-\e(B
-\e$B5n$j$J$5$$!#E,@Z$K%j%j!<%9$5$l$?HG$N\e(B Gnus \e$B$r8+$D$1$F!"Be$o$j$K$=$l$K4s$j\e(B
-\e$BE:$C$F2<$5$$!#\e(B
+``Red Gnus'', ``Quassia Gnus'', ``Pterodactyl Gnus'', ``Oort Gnus''
+-- \e$B$K=P2q$C$F$b!":.Mp$7$J$$$G$/$@$5$$!#$"$J$?$,62$,$C$F$$$k;v$rCN$i$l$F\e(B
+\e$B$O$$$1$^$;$s!#8e$m$K2<$,$j$J$5$$!#$f$C$/$j$H!#B>$K2?$r$7$F$b!"Av$C$F$O$$\e(B
+\e$B$1$^$;$s!#$=$l$,FO$+$/$J$k$^$G!"@E$+$KJb$-5n$j$J$5$$!#E,@Z$K%j%j!<%9$5$l\e(B
+\e$B$?HG$N\e(B Gnus \e$B$r8+$D$1$F!"Be$o$j$K$=$l$K4s$jE:$C$F2<$5$$!#\e(B
 
 @node Other Gnus Versions
 @subsection \e$BB>$N\e(B gnus \e$B$N%P!<%8%g%s\e(B
index 6dbd151..d0c5c29 100644 (file)
@@ -3882,7 +3882,8 @@ You can have as many summary buffers open as you wish.
 * Tree Display::                A more visual display of threads.
 * Mail Group Commands::         Some commands can only be used in mail groups.
 * Various Summary Stuff::       What didn't fit anywhere else.
-* Exiting the Summary Buffer::  Returning to the Group buffer.
+* Exiting the Summary Buffer::  Returning to the Group buffer,
+                                or reselecting the current group.
 * Crosspost Handling::          How crossposted articles are dealt with.
 * Duplicate Suppression::       An alternative when crosspost handling fails.
 * Security::                    Decrypt and Verify.
@@ -4336,6 +4337,9 @@ the given number of lines from the top.
 None of the following movement commands understand the numeric prefix,
 and they all select and display an article.
 
+If you want to fetch new articles or redisplay the group, see
+@ref{Exiting the Summary Buffer}.
+
 @table @kbd
 @item SPACE
 @kindex SPACE (Summary)
@@ -16274,7 +16278,11 @@ your own article.
 
 @vindex message-sent-hook
 These two functions are both primarily meant to be used in hooks like
-@code{message-sent-hook}.
+@code{message-sent-hook}, like this:
+@lisp
+(add-hook 'message-sent-hook 'gnus-score-followup-thread)
+@end lisp
+
 
 If you look closely at your own @code{Message-ID}, you'll notice that
 the first two or three characters are always the same.  Here's two of
@@ -16291,7 +16299,7 @@ myself:
 
 @lisp
 ("references"
- ("<x6[0-9a-z]+\\.fsf\\(_-_\\)?@@.*eyesore.no>"
+ ("<x6[0-9a-z]+\\.fsf\\(_-_\\)?@@.*eyesore\\.no>"
   1000 nil r))
 @end lisp
 
@@ -18911,14 +18919,16 @@ If was released as ``Gnus 5.6'' on March 8th 1998 (46 releases).
 
 Gnus 5.6 begat Pterodactyl Gnus on August 29th 1998 and was released as
 ``Gnus 5.8'' (after 99 releases and a CVS repository) on December 3rd
-1999. 
+1999.
+
+On the 26th of October 2000, Oort Gnus was begun.
 
 If you happen upon a version of Gnus that has a prefixed name --
-``(ding) Gnus'', ``September Gnus'', ``Red Gnus'', ``Quassia Gnus'' --
-don't panic.  Don't let it know that you're frightened.  Back away.
-Slowly.  Whatever you do, don't run.  Walk away, calmly, until you're
-out of its reach.  Find a proper released version of Gnus and snuggle up
-to that instead.
+``(ding) Gnus'', ``September Gnus'', ``Red Gnus'', ``Quassia Gnus'',
+``Pterodactyl Gnus'', ``Oort Gnus'' -- don't panic.  Don't let it know
+that you're frightened.  Back away.  Slowly.  Whatever you do, don't
+run.  Walk away, calmly, until you're out of its reach.  Find a proper
+released version of Gnus and snuggle up to that instead.
 
 
 @node Other Gnus Versions