From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/30018 Path: main.gmane.org!not-for-mail From: Chris Brierley Newsgroups: gmane.emacs.gnus.general Subject: Re: [PATCH] nnimap: Checking mailbox %s vs. Updating info for %s Date: 21 Apr 2000 10:24:14 -0400 Sender: owner-ding@hpc.uh.edu Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: main.gmane.org 1035166603 6261 80.91.224.250 (21 Oct 2002 02:16:43 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 02:16:43 +0000 (UTC) Return-Path: Original-Received: from lisa.math.uh.edu (lisa.math.uh.edu [129.7.128.49]) by mailhost.sclp.com (Postfix) with ESMTP id 95356D051E for ; Fri, 21 Apr 2000 10:24:52 -0400 (EDT) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by lisa.math.uh.edu (8.9.1/8.9.1) with ESMTP id JAB25451; Fri, 21 Apr 2000 09:24:48 -0500 (CDT) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 21 Apr 2000 09:24:18 -0500 (CDT) Original-Received: from mailhost.sclp.com (postfix@sclp3.sclp.com [204.252.123.139]) by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id JAA00825 for ; Fri, 21 Apr 2000 09:24:09 -0500 (CDT) Original-Received: from optical.mindstorm.com (optical.mindstorm.com [209.113.156.7]) by mailhost.sclp.com (Postfix) with ESMTP id DEEFAD0521 for ; Fri, 21 Apr 2000 10:24:24 -0400 (EDT) Original-Received: from OUTLAND.pobox.com (localhost [127.0.0.1]) by optical.mindstorm.com (MindstorM/MindstorM) with ESMTP id KAA04347 for ; Fri, 21 Apr 2000 10:24:21 -0400 Original-To: ding@gnus.org In-Reply-To: Lars Magne Ingebrigtsen's message of "20 Apr 2000 23:30:17 +0200" Original-Lines: 13 User-Agent: Gnus/5.0804 (Gnus v5.8.4) Emacs/20.5 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:30018 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:30018 --=-=-= On 2000-04-20, Lars Magne Ingebrigtsen wrote: > Chris Brierley writes: > > > So, I'm including Simon's patch here in the hopes that it can > > be added to CVS. Thanks. > > Eurm -- could you un-manglify that patch and resend it? Oh, well fine. But it was *much* prettier the way I had it before. ;) --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=gnus-sum.patch --- 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))) --=-=-=--