From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.bugs Subject: bug#6923: 24.0.50; Can't load remote elc.gz file using tramp-ftp Date: Fri, 27 Aug 2010 17:02:32 +0900 Organization: Emacsen advocacy group Message-ID: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: dough.gmane.org 1282896600 21179 80.91.229.12 (27 Aug 2010 08:10:00 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Fri, 27 Aug 2010 08:10:00 +0000 (UTC) To: 6923@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Fri Aug 27 10:09:56 2010 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Oou0V-0007CX-L0 for geb-bug-gnu-emacs@m.gmane.org; Fri, 27 Aug 2010 10:09:52 +0200 Original-Received: from localhost ([127.0.0.1]:50587 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oou0U-0001Us-N9 for geb-bug-gnu-emacs@m.gmane.org; Fri, 27 Aug 2010 04:09:50 -0400 Original-Received: from [140.186.70.92] (port=45012 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oou0K-0001Ui-Cu for bug-gnu-emacs@gnu.org; Fri, 27 Aug 2010 04:09:45 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Oou0F-0003Dn-7Z for bug-gnu-emacs@gnu.org; Fri, 27 Aug 2010 04:09:40 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:44899) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Oou0F-0003Di-4u for bug-gnu-emacs@gnu.org; Fri, 27 Aug 2010 04:09:35 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.69) (envelope-from ) id 1Ootsw-00031l-0h; Fri, 27 Aug 2010 04:02:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Katsumi Yamaoka Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-To: owner@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Fri, 27 Aug 2010 08:02:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 6923 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.128289609211627 (code B ref -1); Fri, 27 Aug 2010 08:02:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 27 Aug 2010 08:01:32 +0000 Original-Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OotsR-00031U-8y for submit@debbugs.gnu.org; Fri, 27 Aug 2010 04:01:31 -0400 Original-Received: from mx10.gnu.org ([199.232.76.166]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OotsO-00031O-FV for submit@debbugs.gnu.org; Fri, 27 Aug 2010 04:01:29 -0400 Original-Received: from lists.gnu.org ([199.232.76.165]:55046) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1Oottn-0008Jw-Iu for submit@debbugs.gnu.org; Fri, 27 Aug 2010 04:02:55 -0400 Original-Received: from [140.186.70.92] (port=56077 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Ootth-0000iZ-VN for bug-gnu-emacs@gnu.org; Fri, 27 Aug 2010 04:02:54 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Oottc-0002Vr-LU for bug-gnu-emacs@gnu.org; Fri, 27 Aug 2010 04:02:49 -0400 Original-Received: from orlando.hostforweb.net ([216.246.45.90]:54245) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Oottc-0002Vl-Hu for bug-gnu-emacs@gnu.org; Fri, 27 Aug 2010 04:02:44 -0400 Original-Received: from localhost ([127.0.0.1]:59161) by orlando.hostforweb.net with esmtpa (Exim 4.69) (envelope-from ) id 1OottY-00070R-Sp; Fri, 27 Aug 2010 03:02:41 -0500 X-Hashcash: 1:20:100827:bug-gnu-emacs@gnu.org::gp3pjTYe7er4BcJM:00000000000000000000000000000000000000000uwJ X-Face: #kKnN,xUnmKia.'[pp`; Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu; B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/24.0.50 (gnu/linux) Cancel-Lock: sha1:ZhNW+4QrwUfzGd6kTU/duMWG7ZQ= X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - orlando.hostforweb.net X-AntiAbuse: Original Domain - gnu.org X-AntiAbuse: Originator/Caller UID/GID - [47 12] / [47 12] X-AntiAbuse: Sender Address Domain - jpl.org X-Source: X-Source-Args: X-Source-Dir: X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Resent-Date: Fri, 27 Aug 2010 04:02:02 -0400 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:39780 Archived-At: Hi, Now there is the file gnus.elc.gz in: /ftp:ftp.jpl.org:/pub/tmp/lisp You can see this one fails: (let ((load-path (cons "/ftp:ftp.jpl.org:/pub/tmp/lisp" load-path))) (load "gnus")) ;; (require 'gnus) also fails. This might not be a bug and there might not be a demand either, but loading elc.gz file using tramp-ssh succeeds (you don't have access to this, sorry): (let ((load-path (cons "/ssh:jpl.org:~/ftp/pub/tmp/lisp" load-path))) (load "gnus")) It seems easy to solve. How about the attached patch? BTW, after starting Emacs, I needed to do tramp-ftp (e.g. dired) to the remote site before testing the above two items. If not, I got the error `Variable binding depth exceeds max-specpdl-size' for unknown reason. At that time, there were many "*ftp-.netrc*" buffers, in which `buffer-file-name' was "~/.netrc". I'd like to investigate this when I have time. Regards, --8<---------------cut here---------------start------------->8--- --- ange-ftp.el~ 2010-05-28 00:48:36 +0000 +++ ange-ftp.el 2010-08-27 05:59:12 +0000 @@ -1728,11 +1728,12 @@ ;;; Temporary file location and deletion... ;;; ------------------------------------------------------------ -(defun ange-ftp-make-tmp-name (host) +(defun ange-ftp-make-tmp-name (host &optional suffix) "This routine will return the name of a new file." (make-temp-file (if (ange-ftp-use-gateway-p host) ange-ftp-gateway-tmp-name-template - ange-ftp-tmp-name-template))) + ange-ftp-tmp-name-template) + nil suffix)) (defun ange-ftp-del-tmp-name (filename) "Force to delete temporary file." @@ -4158,7 +4159,8 @@ (let* ((fn1 (expand-file-name file)) (pa1 (ange-ftp-ftp-name fn1))) (if pa1 - (let ((tmp1 (ange-ftp-make-tmp-name (car pa1)))) + (let ((tmp1 (ange-ftp-make-tmp-name (car pa1) + (file-name-extension file t)))) (ange-ftp-copy-file-internal fn1 tmp1 t nil (format "Getting %s" fn1)) tmp1)))) --8<---------------cut here---------------end--------------->8---