From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Kin Cho Newsgroups: gmane.emacs.help Subject: Re: tramp: plain ftp problem Date: 01 Jul 2003 09:07:44 -0700 Sender: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Message-ID: <7i65mmp6wf.fsf@neoscale.com> References: <7iy8zswew8.fsf@neoscale.com> <7id6h3wbwc.fsf@neoscale.com> <7iof0hu5op.fsf@neoscale.com> <84smprn08h.fsf@lucy.is.informatik.uni-duisburg.de> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: main.gmane.org 1057076181 8486 80.91.224.249 (1 Jul 2003 16:16:21 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Tue, 1 Jul 2003 16:16:21 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Tue Jul 01 18:16:19 2003 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 19XNkg-00022X-00 for ; Tue, 01 Jul 2003 18:13:06 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.20) id 19XNiC-0000kr-7o for gnu-help-gnu-emacs@m.gmane.org; Tue, 01 Jul 2003 12:10:32 -0400 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!fu-berlin.de!uni-berlin.de!12.24.46.66!not-for-mail Original-Newsgroups: gnu.emacs.help Original-Lines: 42 Original-NNTP-Posting-Host: 12.24.46.66 Original-X-Trace: fu-berlin.de 1057075681 33537328 12.24.46.66 (16 [151019]) User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3 Original-Xref: shelby.stanford.edu gnu.emacs.help:114875 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.help:11368 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:11368 kai.grossjohann@gmx.net (Kai Großjohann) writes: > > The HEAD version (Tue Jun 24 10:46:11 2003) of the main branch of > > ange-ftp-generate-root-prefixes seems to have a problem. It > > returns a list instead of a list of lists as expected by > > all-completions (called by ange-ftp-file-name-all-completions). > > I think I agree, but before I commit this, could you tell me how to > reproduce the problem? I've included the stack trace I got when I run this at home. For some reason ange-ftp-generate-root-prefixes doesn't get called at all here at work. I'm using the same customization scripts and emacs version in both environments. Thanks. -kin ange-ftp-generate-root-prefixes() (all-completions file (ange-ftp-generate-root-prefixes)) (nconc (all-completions file (ange-ftp-generate-root-prefixes)) (ange-ftp-real-file-name-all-completions file ange-ftp-this-dir)) (if (ange-ftp-root-dir-p ange-ftp-this-dir) (nconc (all-completions file ...) (ange-ftp-real-file-name-all-completions file ange-ftp-this-dir)) (ange-ftp-real-file-name-all-completions file ange-ftp-this-dir)) (if (ange-ftp-ftp-name ange-ftp-this-dir) (progn (ange-ftp-barf-if-not-directory ange-ftp-this-dir) (setq ange-ftp-this-dir ...) (let* ... ...)) (if (ange-ftp-root-dir-p ange-ftp-this-dir) (nconc ... ...) (ange-ftp-real-file-name-all-completions file ange-ftp-this-dir))) (let ((ange-ftp-this-dir ...)) (if (ange-ftp-ftp-name ange-ftp-this-dir) (progn ... ... ...) (if ... ... ...))) ange-ftp-file-name-all-completions("fo" "/") apply(ange-ftp-file-name-all-completions ("fo" "/")) (progn (apply fn args)) (unwind-protect (progn (apply fn args)) (set-match-data save-match-data-internal)) (let ((save-match-data-internal ...)) (unwind-protect (progn ...) (set-match-data save-match-data-internal))) (save-match-data (apply fn args)) (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation args)) (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler operation args))) ange-ftp-hook-function(file-name-all-completions "fo" "/") apply(ange-ftp-hook-function file-name-all-completions ("fo" "/")) ange-ftp-completion-hook-function(file-name-all-completions "fo" "/") #("/fo" "/home/kin/" t) read-file-name-internal("/fo" "/home/kin/" t) all-completions("/fo" read-file-name-internal "/home/kin/") PC-do-completion(nil) PC-complete() call-interactively(PC-complete)