From 81ab2e072715623f993650ac73490c615bd761ba Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 16 Oct 1997 18:37:51 +0000 Subject: [PATCH] (init_buffer): Don't add /: to default dir if it's `/'. --- src/buffer.c | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/buffer.c b/src/buffer.c index 566757e9987..5bb80523c10 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -3733,7 +3733,12 @@ init_buffer () /* Add /: to the front of the name if it would otherwise be treated as magic. */ temp = Ffind_file_name_handler (current_buffer->directory, Qt); - if (! NILP (temp)) + if (! NILP (temp) + /* If the default dir is just /, TEMP is non-nil + because of the ange-ftp completion handler. + However, it is not necessary to turn / into /:/. + So avoid doing that. */ + && strcmp ("/", XSTRING (current_buffer->directory)->data)) current_buffer->directory = concat2 (build_string ("/:"), current_buffer->directory); -- 2.39.2