From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/54991 Path: main.gmane.org!not-for-mail From: Kevin Greiner Newsgroups: gmane.emacs.gnus.general Subject: Re: Error sending while unplugged Date: Sat, 29 Nov 2003 20:57:18 -0600 Sender: ding-owner@lists.math.uh.edu Message-ID: References: NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1070161109 16454 80.91.224.253 (30 Nov 2003 02:58:29 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sun, 30 Nov 2003 02:58:29 +0000 (UTC) Original-X-From: ding-owner+M3531@lists.math.uh.edu Sun Nov 30 03:58:26 2003 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AQHn0-00013z-00 for ; Sun, 30 Nov 2003 03:58:26 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1AQHmA-0007zK-00; Sat, 29 Nov 2003 20:57:35 -0600 Original-Received: from justine.libertine.org ([66.139.78.221] ident=postfix) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1AQHm2-0007zC-00 for ding@lists.math.uh.edu; Sat, 29 Nov 2003 20:57:26 -0600 Original-Received: from quimby.gnus.org (quimby.gnus.org [80.91.224.244]) by justine.libertine.org (Postfix) with ESMTP id 324033A0096 for ; Sat, 29 Nov 2003 20:57:25 -0600 (CST) Original-Received: from news by quimby.gnus.org with local (Exim 3.35 #1 (Debian)) id 1AQHm0-0004G8-00 for ; Sun, 30 Nov 2003 03:57:24 +0100 Original-To: ding@gnus.org Original-Path: not-for-mail Original-Newsgroups: gnus.ding Original-Lines: 57 Original-NNTP-Posting-Host: dialup-216-12-206-161.ev1.net Original-X-Trace: quimby.gnus.org 1070161044 16375 216.12.206.161 (30 Nov 2003 02:57:24 GMT) Original-X-Complaints-To: usenet@quimby.gnus.org Original-NNTP-Posting-Date: Sun, 30 Nov 2003 02:57:24 +0000 (UTC) User-Agent: Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3 (windows-nt) Cancel-Lock: sha1:xokrGaAR4b5DIWQigDsmfh/xjO0= Precedence: bulk Xref: main.gmane.org gmane.emacs.gnus.general:54991 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:54991 Nevin Kapur writes: > Trying to send something while unplugged resulted in the following > error. This seems related to the recent changes in the agent code. > > -Nevin > > Debugger entered--Lisp error: (wrong-type-argument listp "nnimap:Caltech") > car("nnimap:Caltech") > (eq (car m1) (car m2)) > (and (eq (car m1) (car m2)) (or (not ...) (equal ... ...))) > (or (equal m1 m2) (and (eq ... ...) (or ... ...))) > (let ((m1 ...) (m2 ...)) (or (equal m1 m2) (and ... ...))) > gnus-methods-equal-p((nntp "News.CIS.DFN.DE") "nnimap:Caltech") > (if (gnus-methods-equal-p (cdr name-method) method) (progn (unless ... ...) (throw ... ...))) > (when (gnus-methods-equal-p (cdr name-method) method) (unless (member name-method gnus-server-method-cache) (push name-method gnus-server-method-cache)) (throw (quote server-name) (car name-method))) > (lambda (name-method) (when (gnus-methods-equal-p ... method) (unless ... ...) (throw ... ...)))(("native" nntp "News.CIS.DFN.DE")) > mapc((lambda (name-method) (when (gnus-methods-equal-p ... method) (unless ... ...) (throw ... ...))) (("native" nntp "News.CIS.DFN.DE"))) > (lambda (server-alist) (mapc (lambda ... ...) server-alist))((("native" nntp "News.CIS.DFN.DE"))) > mapc((lambda (server-alist) (mapc (lambda ... ...) server-alist)) ((("native" nntp "News.CIS.DFN.DE")) (("archive" nnfolder "archive" ... ... ... ...)) (("cache" nnspool "cache" ... ... ...)))) > (catch (quote server-name) (setq method (or method gnus-select-method)) (mapc (lambda ... ...) gnus-server-method-cache) (mapc (lambda ... ...) (let ... ... alists)) (let* (... ...) (unless ... ...) name)) > gnus-method-to-server("nnimap:Caltech") > (member (gnus-method-to-server method) gnus-agent-covered-methods) > (cons method (member (gnus-method-to-server method) gnus-agent-covered-methods)) > (setq gnus-agent-method-p-cache (cons method (member ... gnus-agent-covered-methods))) > (or (eq (car gnus-agent-method-p-cache) method) (setq gnus-agent-method-p-cache (cons method ...))) > gnus-agent-method-p("nnimap:Caltech") > (setq covered (gnus-agent-method-p (car methods)) methods (cdr methods)) > (while (and (not covered) methods) (setq covered (gnus-agent-method-p ...) methods (cdr methods))) > (let* ((gcc ...) (methods ...) covered) (while (and ... methods) (setq covered ... methods ...)) covered) > (save-restriction (message-narrow-to-headers) (let* (... ... covered) (while ... ...) covered)) > gnus-agent-any-covered-gcc() > (and (not gnus-plugged) (gnus-agent-any-covered-gcc)) > (if (and (not gnus-plugged) (gnus-agent-any-covered-gcc)) (progn (save-excursion ... ...))) > (when (and (not gnus-plugged) (gnus-agent-any-covered-gcc)) (save-excursion (goto-char ...) (let ... ...))) > gnus-agent-possibly-save-gcc() > run-hooks(message-header-hook) > message-send-mail(nil) > message-send-via-mail(nil) > message-send(nil) > message-send-and-exit(nil) > * call-interactively(message-send-and-exit) You're correct in that it is related. Unfortunately, it's a rather interesting relationship. I did rewrite the gnus-agent-method-p function. However, neither the old, nor the new, versions accepted a server name such as "nnimap:Caltech". The old difference is that the old version quietly returned nil while the new version throws the error that you reported. This would seem to indicate that gnus-agent-any-covered-gcc has always been buggy. I'm going to fix gnus-agent-method-p so that it will accept a server. That may change the behavior of gnus-agent-any-covered-gcc as gnus-agent-method-p may now return t. Please keep me informed. Kevin