From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Shun-ichi GOTO Newsgroups: gmane.emacs.devel Subject: Re: url-gw.el: Cannot use proxy with url-gw.el 1.15 Date: Thu, 09 Nov 2006 18:23:55 +0900 Message-ID: References: <8764dptl03.fsf@furball.mit.edu> <2288dbd90611081906q66328d53n89044b151cd0c4b3@mail.gmail.com> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 (generated by SEMI 1.14.6 - "Maruoka") Content-Type: text/plain; charset=US-ASCII X-Trace: sea.gmane.org 1163068936 4909 80.91.229.2 (9 Nov 2006 10:42:16 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 9 Nov 2006 10:42:16 +0000 (UTC) Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Nov 09 11:42:11 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1Gi7Lf-0006MA-JZ for ged-emacs-devel@m.gmane.org; Thu, 09 Nov 2006 11:41:31 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Gi7Lf-0007kN-5J for ged-emacs-devel@m.gmane.org; Thu, 09 Nov 2006 05:41:31 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Gi7LU-0007jY-Sh for emacs-devel@gnu.org; Thu, 09 Nov 2006 05:41:20 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Gi7LS-0007j3-BV for emacs-devel@gnu.org; Thu, 09 Nov 2006 05:41:20 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Gi7LS-0007j0-7Z for emacs-devel@gnu.org; Thu, 09 Nov 2006 05:41:18 -0500 Original-Received: from [80.91.229.2] (helo=ciao.gmane.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA:32) (Exim 4.52) id 1Gi6rJ-00025v-Tu for emacs-devel@gnu.org; Thu, 09 Nov 2006 05:10:10 -0500 Original-Received: from root by ciao.gmane.org with local (Exim 4.43) id 1Gi6rC-0000YN-99 for emacs-devel@gnu.org; Thu, 09 Nov 2006 11:10:02 +0100 Original-Received: from zippo.taiyo.co.jp ([59.139.21.101]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 09 Nov 2006 11:10:02 +0100 Original-Received: from gotoh by zippo.taiyo.co.jp with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 09 Nov 2006 11:10:02 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-To: emacs-devel@gnu.org Original-Lines: 54 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: zippo.taiyo.co.jp In-Reply-To: <2288dbd90611081906q66328d53n89044b151cd0c4b3@mail.gmail.com> User-Agent: xcite1.47> Wanderlust/2.14.0 (Africa) SEMI/1.14.6 (Maruoka) FLIM/1.14.8 (=?ISO-8859-4?Q?Shij=F2?=) APEL/10.6 Emacs/22.0.90 (i386-msvc-nt5.1.2600) MULE/5.0 (SAKAKI) Meadow/3.00-dev (KIKU) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:61999 Archived-At: >> Does this patch solve the problem? > > No. It didn't. I found the bug (maybe). Is this correct? Anyway, I got expected response with this patch. Last one fixes my problem. 1st and 2nd is not required for my problem, but I guess it is required generaly. And also some more files have a code checking process status. Index: url-http.el =================================================================== RCS file: /sources/emacs/emacs/lisp/url/url-http.el,v retrieving revision 1.40 diff -u -r1.40 url-http.el --- url-http.el 8 Nov 2006 20:34:36 -0000 1.40 +++ url-http.el 9 Nov 2006 09:17:50 -0000 @@ -92,7 +92,7 @@ (defun url-http-mark-connection-as-free (host port proc) (url-http-debug "Marking connection as free: %s:%d %S" host port proc) - (when (memq (process-status proc) '(open run)) + (when (memq (process-status proc) '(open run connect)) (set-process-buffer proc nil) (set-process-sentinel proc 'url-http-idle-sentinel) (puthash (cons host port) @@ -104,7 +104,7 @@ (let ((conns (gethash (cons host port) url-http-open-connections)) (found nil)) (while (and conns (not found)) - (if (not (memq (process-status (car conns)) '(run open))) + (if (not (memq (process-status (car conns)) '(run open connect))) (progn (url-http-debug "Cleaning up dead process: %s:%d %S" host port (car conns)) @@ -1144,7 +1144,7 @@ (cond ((string= (substring why 0 4) "open") (set-process-sentinel proc 'url-http-end-of-document-sentinel) - (process-send-string proc (url-http-create-request url-current-object))) + (process-send-string proc (url-http-create-request url-http-target-url))) (t (setf (car url-callback-arguments) (nconc (list :error (list 'error 'connection-failed why --- Regards, Shun-ichi Goto R&D Group, TAIYO Corp., Tokyo, JAPAN