From: yamaoka <yamaoka>
Date: Thu, 10 Sep 1998 05:03:17 +0000 (+0000)
Subject: 	Sync up with Pterodactyl Gnus 0.24.
X-Git-Tag: pgnus-ichikawa-199811302358~221
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6a4665059e4bff54c5baf8cb0f92a7c81796be2e;p=elisp%2Fgnus.git-

	Sync up with Pterodactyl Gnus 0.24.

A snapshot is available from
 ftp://ftp.jpl.org/pub/tmp/semi-gnus-pgnus-ichikawa-19980910-1.tar.gz
---

diff --git a/ChangeLog b/ChangeLog
index d603627..ba40bc4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+1998-09-10  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+	* lisp/gnus.el (gnus-version-number): Update to 6.10.016.
+
+	* Sync up with Pterodactyl Gnus 0.24.
+
 1998-09-09  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* lisp/gnus.el (gnus-version-number): Update to 6.10.015.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 81e28ae..312755f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,36 @@
+Thu Sep 10 04:03:29 1998  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
+
+	* gnus.el: Pterodactyl Gnus v0.24 is released.
+
+1998-09-10 01:58:24  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+	* gnus-sum.el (gnus-summary-show-article): Don't decode chars if
+	PREFIX. 
+
+	* parse-time.el (parse-time-rules): Accept times that look like
+	"h:mm". 
+
+	* message.el (message-make-date): Use zone properly.
+
+	* gnus.el: Autoload gnus-batch.
+
+	* gnus-art.el (article-de-quoted-unreadable): Do not do
+	gnus-article-decode-rfc1522. 
+
+	* gnus-msg.el (gnus-inews-do-gcc): Use it.
+
+	* gnus-int.el (gnus-request-accept-article): Accept a no-encode
+	param. 
+
+	* message.el (message-encode-message-body): Check for us-ascii.
+
+	* gnus-msg.el (gnus-extended-version): Move Gnus version comments
+	to the left.
+
+1998-09-09 13:18:13  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+	* gnus-art.el (article-decode-charset): Rename.
+
 Wed Sep  9 12:25:48 1998  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
 
 	* gnus.el: Pterodactyl Gnus v0.23 is released.
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index efe14d1..54af5ba 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -1783,6 +1783,7 @@ If variable `gnus-use-long-file-name' is non-nil, it is
      article-date-iso8601
      article-date-original
      article-date-ut
+     article-decode-mime-words
      article-date-user
      article-date-lapsed
      article-emphasize
diff --git a/lisp/gnus-int.el b/lisp/gnus-int.el
index 8143d0d..21ef876 100644
--- a/lisp/gnus-int.el
+++ b/lisp/gnus-int.el
@@ -423,7 +423,8 @@ If GROUP is nil, all groups on GNUS-COMMAND-METHOD are scanned."
 	     article (gnus-group-real-name group)
 	     (nth 1 gnus-command-method) accept-function last)))
 
-(defun gnus-request-accept-article (group &optional gnus-command-method last)
+(defun gnus-request-accept-article (group &optional gnus-command-method last
+					  no-encode)
   ;; Make sure there's a newline at the end of the article.
   (when (stringp gnus-command-method)
     (setq gnus-command-method (gnus-server-to-method gnus-command-method)))
diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 1346ebe..e9dd5fc 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -968,7 +968,7 @@ this is a reply."
 		       (concat "^" (regexp-quote mail-header-separator) "$")
 		       nil t)
 		  (replace-match "" t t ))
-		(unless (gnus-request-accept-article group method t)
+		(unless (gnus-request-accept-article group method t t)
 		  (gnus-message 1 "Couldn't store article in group %s: %s"
 				group (gnus-status-message method))
 		  (sit-for 2))
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index bad5ca8..3fe444e 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -6822,6 +6822,7 @@ article massaging functions being run."
     (let ((gnus-have-all-headers t)
 	  gnus-article-display-hook
 	  gnus-article-prepare-hook
+	  gnus-article-decode-hook
 	  gnus-break-pages
 	  gnus-show-mime
 	  gnus-visual)
diff --git a/lisp/gnus.el b/lisp/gnus.el
index b6fd8fe..677024c 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -253,10 +253,10 @@ is restarted, and sometimes reloaded."
 (defconst gnus-product-name "T-gnus"
   "Product name of this version of gnus.")
 
-(defconst gnus-version-number "6.10.015"
+(defconst gnus-version-number "6.10.016"
   "Version number for this version of gnus.")
 
-(defconst gnus-original-version-number "0.23"
+(defconst gnus-original-version-number "0.24"
     "Version number for this version of Gnus.")
 
 (defconst gnus-original-product-name "Pterodactyl Gnus"
@@ -1626,7 +1626,7 @@ gnus-newsrc-hashtb should be kept so that both hold the same information.")
       gnus-article-hide-citation-in-followups)
      ("gnus-kill" gnus-kill gnus-apply-kill-file-internal
       gnus-kill-file-edit-file gnus-kill-file-raise-followups-to-author
-      gnus-execute gnus-expunge)
+      gnus-execute gnus-expunge gnus-batch-kill gnus-batch-score)
      ("gnus-cache" gnus-cache-possibly-enter-article gnus-cache-save-buffers
       gnus-cache-possibly-remove-articles gnus-cache-request-article
       gnus-cache-retrieve-headers gnus-cache-possibly-alter-active
diff --git a/lisp/message.el b/lisp/message.el
index be70d14..48d0ce2 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -1,3 +1,4 @@
+
 ;;; message.el --- composing mail and news messages
 ;; Copyright (C) 1996,97,98 Free Software Foundation, Inc.
 
@@ -2838,9 +2839,6 @@ If NOW, use that time instead."
 	 (zone (nth 8 (decode-time now)))
 	 (sign "+"))
     ;; We do all of this because XEmacs doesn't have the %z spec.
-    (when (> (/ zone 3600) 12)
-      (setq sign "-"
-	    zone (- zone (* 3600 12))))
     (concat (format-time-string "%d %b %Y %H:%M:%S " (or now (current-time)))
 	    (format "%s%02d%02d"
 		    sign (/ zone 3600)
diff --git a/lisp/parse-time.el b/lisp/parse-time.el
index 2871623..d9514f6 100644
--- a/lisp/parse-time.el
+++ b/lisp/parse-time.el
@@ -157,6 +157,11 @@
     ((2 1 0)
      ,#'(lambda () (and (stringp elt) (= (length elt) 5) (= (aref elt 2) ?:)))
      [0 2] [3 5] ,#'(lambda () 0))
+    ((2 1 0)
+     ,#'(lambda () (and (stringp elt)
+			(= (length elt) 4)
+			(= (aref elt 1) ?:)))
+     [0 1] [2 4] ,#'(lambda () 0))
     ((5) (70 99) ,#'(lambda () (+ 1900 elt))))
   "(slots predicate extractor...)")
 
diff --git a/texi/ChangeLog b/texi/ChangeLog
index ef1680a..30a8b29 100644
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,3 +1,7 @@
+1998-09-10 03:19:14  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+	* gnus.texi (Windows Configuration): Addition.
+
 1998-09-06  Mike McEwan  <mike@lotusland.demon.co.uk>
 
 	* gnus.texi (Category Syntax): Added doc about agent categories
diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi
index a18ea20..be48633 100644
--- a/texi/gnus-ja.texi
+++ b/texi/gnus-ja.texi
@@ -1,7 +1,7 @@
 \input texinfo                  @c -*-texinfo-*-
 
 @setfilename gnus-ja
-@settitle Semi-gnus 6.10.015 Manual
+@settitle Semi-gnus 6.10.016 Manual
 @synindex fn cp
 @synindex vr cp
 @synindex pg cp
@@ -345,7 +345,7 @@ into another language, under the above conditions for modified versions.
 @tex
 
 @titlepage
-@title Semi-gnus 6.10.015 Manual
+@title Semi-gnus 6.10.016 Manual
 
 @author by Lars Magne Ingebrigtsen
 @author by members of Semi-gnus mailing-list
@@ -399,7 +399,7 @@ Semi-gnus は、大きな絵が入っていたりさまざまな形式を用いたりしているちょっ
 な言語圏を差別しません。ああ、クリンゴンの方は Unicode Next Generationを
 お待ちください。
 
-この説明書は Semi-gnus 6.10.015 に対応します。
+この説明書は Semi-gnus 6.10.016 に対応します。
 
 @end ifinfo
 
@@ -6067,12 +6067,12 @@ gnus が提案をします）を入力するように促され、それから命令が実行されます。
 @vindex gnus-header-face-alist
 ヘッダーをハイライトします (@code{gnus-article-highlight-headers})。ハイ
 ライトは変数 @code{gnus-header-face-alist} にしたがってなされ、それはそ
-れぞれの要素が @var{(正規表現 名前 内容)} という様式のリストです。 @var
-{正規表現}はヘッダーに合致する正規表現、@var{名前}はヘッダーの名前をハイ
-ライトするのに使われるフェイス (face) (@pxref{Faces and Fonts})、@var{内
-容}はヘッダーの値をハイライトするフェイスです。最初に合致したものが使わ
-れます。@var{正規表現}は @samp{^} が付けられるべきではない事に注意してく
-ださい――gnus がそれを付け加えます。
+れぞれの要素が @var{(正規表現 名前 内容)} という様式のリストです。 
+@var{正規表現}はヘッダーに合致する正規表現、@var{名前}はヘッダーの名前を
+ハイライトするのに使われるフェイス (face) (@pxref{Faces and Fonts})、
+@var{内容}はヘッダーの値をハイライトするフェイスです。最初に合致したもの
+が使われます。@var{正規表現}は @samp{^} が付けられるべきではない事に注意
+してください――gnus がそれを付け加えます。
 
 @item W H c
 @kindex W H c （概略）
@@ -9268,9 +9268,9 @@ Backend} と @pxref{Expiring Mail} を。
 
 @lisp
 (setq nnmail-split-methods
-'(("mail.junk" "^From:.*Lars Ingebrigtsen")
-  ("mail.crazy" "^Subject:.*die\\|^Organization:.*flabby")
-  ("mail.other" "")))
+  '(("mail.junk" "^From:.*Lars Ingebrigtsen")
+    ("mail.crazy" "^Subject:.*die\\|^Organization:.*flabby")
+    ("mail.other" "")))
 @end lisp
 
 この変数はリストのリストで、これらのリストの最初のそれぞれの要素がメール
diff --git a/texi/gnus.texi b/texi/gnus.texi
index d1f8961..ab23e52 100644
--- a/texi/gnus.texi
+++ b/texi/gnus.texi
@@ -1,7 +1,7 @@
 \input texinfo                  @c -*-texinfo-*-
 
 @setfilename gnus
-@settitle Semi-gnus 6.10.015 Manual
+@settitle Semi-gnus 6.10.016 Manual
 @synindex fn cp
 @synindex vr cp
 @synindex pg cp
@@ -318,7 +318,7 @@ into another language, under the above conditions for modified versions.
 @tex
 
 @titlepage
-@title Semi-gnus 6.10.015 Manual
+@title Semi-gnus 6.10.016 Manual
 
 @author by Lars Magne Ingebrigtsen
 @page
@@ -361,7 +361,7 @@ internationalization/localization and multiscript features based on MULE
 API.  So Semi-gnus does not discriminate various language communities.
 Oh, if you are a Klingon, please wait Unicode Next Generation.
 
-This manual corresponds to Semi-gnus 6.10.015.
+This manual corresponds to Semi-gnus 6.10.016.
 
 @end ifinfo
 
@@ -14278,6 +14278,9 @@ If @code{gnus-use-full-window} non-@code{nil}, Gnus will delete all
 other windows and occupy the entire Emacs screen by itself.  It is
 @code{t} by default.
 
+Setting this variable to @code{nil} kinda works, but there are
+glitches.  Use at your own peril.
+
 @vindex gnus-buffer-configuration
 @code{gnus-buffer-configuration} describes how much space each Gnus
 buffer should be given.  Here's an excerpt of this variable:
diff --git a/texi/message.texi b/texi/message.texi
index 1b756ca..1ff0844 100644
--- a/texi/message.texi
+++ b/texi/message.texi
@@ -1,7 +1,7 @@
 \input texinfo                  @c -*-texinfo-*-
 
 @setfilename message
-@settitle Pterodactyl Message 0.23 Manual
+@settitle Pterodactyl Message 0.24 Manual
 @synindex fn cp
 @synindex vr cp
 @synindex pg cp
@@ -42,7 +42,7 @@ into another language, under the above conditions for modified versions.
 @tex
 
 @titlepage
-@title Pterodactyl Message 0.23 Manual
+@title Pterodactyl Message 0.24 Manual
 
 @author by Lars Magne Ingebrigtsen
 @page
@@ -83,7 +83,7 @@ Message mode buffers.
 * Key Index::         List of Message mode keys.
 @end menu
 
-This manual corresponds to Pterodactyl Message 0.23.  Message is
+This manual corresponds to Pterodactyl Message 0.24.  Message is
 distributed with the Gnus distribution bearing the same version number
 as this manual.