From: hayashi <hayashi>
Date: Wed, 6 Oct 1999 05:07:22 +0000 (+0000)
Subject: Revert previous change of not making error.
X-Git-Tag: t-gnus-6_13_2-03~5
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=fbcbf6bf072ff7f3ee95217a8a1fe245ab55850d;p=elisp%2Fgnus.git-

Revert previous change of not making error.
---

diff --git a/ChangeLog b/ChangeLog
index c985599..7683541 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+1999-10-06  Yoshiki Hayashi  <t90553@mail.ecc.u-tokyo.ac.jp>
+
+	* lisp/gnus-sum.el (gnus-read-move-group-name): Revert
+	to previous version until problem of respooling from
+	nnimap to nnml is solved.
+	(gnus-summary-move-article): Ditto.
+
 1999-10-05  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* lisp/gnus.el (gnus-revision-number): Increment to 02.
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 66b1d1a..b10afd3 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -7411,10 +7411,6 @@ and `request-accept' functions."
 	     (symbol-value (intern (format "gnus-current-%s-group" action)))
 	     articles prefix))
       (set (intern (format "gnus-current-%s-group" action)) to-newsgroup))
-    (if (null to-newsgroup)
-	(message "Nothing to be done")
-      ;; We don't dare to indent below to make future sync'ing easier.
-
     (setq to-method (or select-method
 			(gnus-group-name-to-method to-newsgroup)))
     ;; Check the method we are to move this article to...
@@ -7590,7 +7586,6 @@ and `request-accept' functions."
     (gnus-kill-buffer copy-buf)
     (gnus-summary-position-point)
     (gnus-set-mode-line 'summary)))
-  )
 
 (defun gnus-summary-copy-article (&optional n to-newsgroup select-method)
   "Move the current article to a different newsgroup.
@@ -9137,7 +9132,7 @@ save those articles instead."
 					    (gnus-group-name-to-method
 					     to-newsgroup)))
 		  (error "Couldn't create group %s" to-newsgroup)))
-	  (setq to-newsgroup nil)))
+	  (error "No such group: %s" to-newsgroup)))
     to-newsgroup))
 
 (defun gnus-summary-save-parts (type dir n reverse)