From: yamaoka <yamaoka>
Date: Sat, 4 Feb 2006 21:39:49 +0000 (+0000)
Subject: Synch to No Gnus 200602042138.
X-Git-Tag: t-gnus-6_17_4-quimby-~114
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c34eaf31dceddb4467b60e01c791ae368793c8de;p=elisp%2Fgnus.git-

Synch to No Gnus 200602042138.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8ec181b..1976590 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
+2006-02-04  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* rfc2231.el (rfc2231-parse-string): Revert 2006-02-03 change.
+	(rfc2231-encode-string): Make param*=value always begin with LWSP.
+
+2006-02-03  Andreas Seltenreich <uwi7@stud.uni-karlsruhe.de>
+
+	* nnweb.el (nnweb-request-group): Avoid growing overview files.
+
 2006-02-03  Katsumi Yamaoka  <yamaoka@jpl.org>
 
 	* rfc2231.el (rfc2231-parse-string): Add missing semicolons to
diff --git a/lisp/nnweb.el b/lisp/nnweb.el
index e855809..0e08acb 100644
--- a/lisp/nnweb.el
+++ b/lisp/nnweb.el
@@ -133,7 +133,8 @@ Valid types include `google', `dejanews', and `gmane'.")
 (deffoo nnweb-request-group (group &optional server dont-check)
   (nnweb-possibly-change-server group server)
   (unless (or nnweb-ephemeral-p
-	      dont-check)
+	      dont-check
+	      nnweb-articles)
     (nnweb-read-overview group))
   (cond
    ((not nnweb-articles)
diff --git a/lisp/rfc2231.el b/lisp/rfc2231.el
index 85fdae8..52afcf6 100644
--- a/lisp/rfc2231.el
+++ b/lisp/rfc2231.el
@@ -53,10 +53,6 @@ The list will be on the form
 	  display-name mailbox c display-string parameters
 	  attribute value type subtype number encoded
 	  prev-attribute prev-encoded)
-      ;; Some mailer (e.g. Thunderbird 1.5) doesn't terminate each
-      ;; line with semicolon when folding a long parameter value.
-      (while (string-match "\\([^\t\n\r ;]\\)[\t ]*\r?\n[\t ]+" string)
-	(setq string (replace-match "\\1;\n " nil nil string)))
       (ietf-drums-init (mail-header-remove-whitespace
 			(mail-header-remove-comments string)))
       (let ((table (copy-syntax-table ietf-drums-syntax-table)))
@@ -239,7 +235,7 @@ These look like \"us-ascii'en-us'This%20is%20%2A%2A%2Afun%2A%2A%2A\"."
 	    (forward-char 1)))
 	(goto-char (point-min))
 	(if (not broken)
-	    (insert param "*=")
+	    (insert "\n " param "*=")
 	  (while (not (eobp))
 	    (insert (if (>= num 0) " " "\n ")
 		    param "*" (format "%d" (incf num)) "*=")