efs/dired bug?
J.H.Petersen (J.Petersen@qmw.ac.uk)
Sat, 12 Mar 1994 11:02:55 GMT
When I am in a buffer at a remote site <current> with efs-1.6,
and I try to find-file say at another remote site <new>, which I have
not visited yet, I get an error (in the minibuffer):
Setting current directory: no such file or directory /<current>....
If I type out <new> by hand (it can't complete at this point) and
press return however, it _does_ dired the `home' dir at <new>.
The backtrace from the debugger follows.
-Jens
----------------------- debugger backtrace ------------------------------
Signalling: (file-error "Setting current directory" "no such file or directory" "/anonymous@src.doc.ic.ac.uk:/computing/operating-systems/Linux/")
start-process("*ftp anonymous@anubis.ethz.ch*" "*ftp anonymous@anubis.ethz.ch*" "ftp" "-i" "-n" "-g" "-v")
apply(start-process "*ftp anonymous@anubis.ethz.ch*" "*ftp anonymous@anubis.ethz.ch*" ("ftp" "-i" "-n" "-g" "-v"))
efs-start-process("anubis.ethz.ch" "anonymous" "*ftp anonymous@anubis.ethz.ch*")
efs-get-process("anubis.ethz.ch" "anonymous")
efs-host-type("anubis.ethz.ch" "anonymous")
expand-file-name("/anubis.ethz.ch:sandy/efs/" "/src.doc.ic.ac.uk:/computing/operating-systems/Linux/")
apply(expand-file-name ("/anubis.ethz.ch:sandy/efs/" "/src.doc.ic.ac.uk:/computing/operating-systems/Linux/"))
efs-file-handler-function(expand-file-name "/anubis.ethz.ch:sandy/efs/" "/src.doc.ic.ac.uk:/computing/operating-systems/Linux/")
read-file-name-internal("$efs" "/src.doc.ic.ac.uk:/computing/operating-systems/Linux/" nil)
minibuffer-complete()
* call-interactively(minibuffer-complete)
completing-read("Find file: " read-file-name-internal "/src.doc.ic.ac.uk:/computing/operating-systems/Linux/" nil "/src.doc.ic.ac.uk:/computing/operating-systems/Linux/" file-name-history)
efs-19-read-file-name-1(file-name-history "Find file: " nil nil nil nil read-file-name-internal)
read-file-name("Find file: ")
(expand-file-name (read-file-name "Find file: ")))
(let ((default-directory ...)) (expand-file-name (read-file-name "Find file: "))))
(list (let (...) (expand-file-name ...))))
call-interactively(find-file)
--------------------------------- end -------------------------------------