From: yamaoka <yamaoka>
Date: Wed, 20 Aug 2003 00:38:44 +0000 (+0000)
Subject: Synch to Gnus 200308192349.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=788d4d5ed84ef7e8297ec639beec47634d88b15a;p=elisp%2Fgnus.git-

Synch to Gnus 200308192349.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 278ff89..0fea0ee 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,16 @@
+2003-08-20  Jesper Harder  <harder@ifa.au.dk>
+
+	* gnus-art.el (gnus-article-edit-done, gnus-article-edit-exit):
+	Redisplay article after editing.
+
+2003-08-20  Simon Josefsson  <jas@extundo.com>
+
+	* gnus.el (gnus-read-group): Added check to ask confirmation if
+	Group name contains invalid character. You can use '/' in IMAP,
+	but not in filenames. G m cannot know what the user is creating,
+	so let user decide. See thread m2oeysiev3.fsf@naima.lensflare.org.
+	Tiny patch from letters@hotpop.com (Jari Aalto+mail.linux).
+
 2003-08-13  Reiner Steib  <Reiner.Steib@gmx.de>
 
 	* gnus-score.el (gnus-summary-score-effect): Fix interactive use.
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 1103eea..69359ca 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -5990,7 +5990,8 @@ groups."
     (set-window-configuration winconf)
     (set-buffer buf)
     (set-window-start (get-buffer-window buf) start)
-    (set-window-point (get-buffer-window buf) (point))))
+    (set-window-point (get-buffer-window buf) (point)))
+  (gnus-summary-show-article))
 
 (defun gnus-article-edit-exit ()
   "Exit the article editing without updating."
@@ -6011,7 +6012,8 @@ groups."
 	(save-current-buffer
 	  (set-buffer curbuf)
 	  (set-window-start (get-buffer-window (current-buffer)) window-start)
-	  (goto-char p))))))
+	  (goto-char p))))
+    (gnus-summary-show-article)))
 
 (defun gnus-article-edit-full-stops ()
   "Interactively repair spacing at end of sentences."
diff --git a/lisp/gnus.el b/lisp/gnus.el
index dc91dce..049e7bd 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -3803,8 +3803,14 @@ Disallow invalid group names."
 	     (setq group (read-string (concat prefix prompt)
 				      (cons (or default "") 0)
 				      'gnus-group-history)))
-	(setq prefix (format "Invalid group name: \"%s\".  " group)
-	      group nil)))
+	(let ((match (match-string 0 group)))
+	  (unless (y-or-n-p
+		   (format
+		    "Name \"%s\" contain forbidden \"%s\" (see "
+		    "gnus-invalid-group-regexp).  Proceed? "
+		    group match))
+	    (setq prefix (format "Invalid group name: \"%s\".  " group)
+		  group nil)))))
     group))
 
 (defun gnus-read-method (prompt)
diff --git a/texi/ChangeLog b/texi/ChangeLog
index 8b382f1..309b525 100644
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,3 +1,7 @@
+2003-08-20  Simon Josefsson  <jas@extundo.com>
+
+	* gnus.texi (GroupLens): Move text around.
+
 2003-08-16  Jesper Harder  <harder@ifa.au.dk>
 
 	* gnus.texi (Searching for Articles): Fix example.
diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi
index 942d6a4..3619d85 100644
--- a/texi/gnus-ja.texi
+++ b/texi/gnus-ja.texi
@@ -19133,6 +19133,9 @@ Gnus はまだ、あのうざったい古い消去ファイルをサポートしています。実際消
 @section GroupLens
 @cindex GroupLens
 
+@sc{注意:} 残念なことに GroupLens 機構は閉鎖されているようなので、この項
+は主として歴史的な興趣のために書かれています。
+
 @uref{http://www.cs.umn.edu/Research/GroupLens/, GroupLens} は、毎日作成
 される多くの量のニュース記事から質の良い記事を他の人と共に見つけるのを助
 けるための共同選別機構です。
@@ -19145,9 +19148,6 @@ Gnus はまだ、あのうざったい古い消去ファイルをサポートしています。実際消
 れば、予言の形で、それらの人が記事をどう思うかをあなたに告げます。あなた
 はこの予言を記事を読みたいかどうかを決定するのに役立てる事ができます。
 
-@sc{注意:} 残念なことに GroupLens 機構は閉鎖されているようなので、この項
-は主として歴史的な興趣のために書かれています。
-
 @menu
 * Using GroupLens::             どのように gnus に GroupLens を使わせるようにするか
 * Rating Articles::             GropLens にあなたがどのように値を付けるかを知らせる
diff --git a/texi/gnus.texi b/texi/gnus.texi
index 4a50557..f93c4b6 100644
--- a/texi/gnus.texi
+++ b/texi/gnus.texi
@@ -19875,6 +19875,9 @@ before.
 @section GroupLens
 @cindex GroupLens
 
+@sc{Note:} Unfortunately the GroupLens system seems to have shut down,
+so this section is mostly of historical interest.
+
 @uref{http://www.cs.umn.edu/Research/GroupLens/, GroupLens} is a
 collaborative filtering system that helps you work together with other
 people to find the quality news articles out of the huge volume of
@@ -19890,9 +19893,6 @@ of a prediction, what they thought of the article.  You can use this
 prediction to help you decide whether or not you want to read the
 article.
 
-@sc{Note:} Unfortunately the GroupLens system seems to have shut down,
-so this section is mostly of historical interest.
-
 @menu
 * Using GroupLens::             How to make Gnus use GroupLens.
 * Rating Articles::             Letting GroupLens know how you rate articles.