--- lisp/gnus-sum.el	2000/02/03 16:28:49	5.97
+++ lisp/gnus-sum.el	2000/03/01 19:45:52
@@ -7322,7 +7322,7 @@
 	     articles prefix))
       (set (intern (format "gnus-current-%s-group" action)) to-newsgroup))
     (setq to-method (or select-method
-			(gnus-group-name-to-method to-newsgroup)))
+			(gnus-group-method to-newsgroup)))
     ;; Check the method we are to move this article to...
     (unless (gnus-check-backend-function
 	     'request-accept-article (car to-method))
@@ -9027,14 +9027,15 @@
       (unless to-newsgroup
 	(error "No group name entered"))
       (or (gnus-active to-newsgroup)
-	  (gnus-activate-group to-newsgroup)
+	  (gnus-activate-group to-newsgroup nil nil
+			       (gnus-group-method to-newsgroup))
 	  (if (gnus-y-or-n-p (format "No such group: %s.  Create it? "
 				     to-newsgroup))
 	      (or (and (gnus-request-create-group
-			to-newsgroup (gnus-group-name-to-method to-newsgroup))
+			to-newsgroup (gnus-group-method to-newsgroup))
 		       (gnus-activate-group
 			to-newsgroup nil nil
-			(gnus-group-name-to-method to-newsgroup))
+			(gnus-group-method to-newsgroup))
 		       (gnus-subscribe-group to-newsgroup))
 		  (error "Couldn't create group %s" to-newsgroup)))
 	  (error "No such group: %s" to-newsgroup)))