procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Fread_file_name): Fix previous change.

Browse source
This commit is contained in:
Kenichi Handa 2003-03-19 12:09:37 +00:00
parent 4f497b0aab
commit 602040466d
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/fileio.c
View file

@ -6063,7 +6063,7 @@ provides a file dialog box. */)
SBYTES (decoded_homedir))
&& IS_DIRECTORY_SEP (SREF (dir, SBYTES (decoded_homedir))))
{
dir = Fsubstring (dir, make_number (SCHARS (decoded_homedir) + 1), Qnil);
dir = Fsubstring (dir, make_number (SCHARS (decoded_homedir)), Qnil);
dir = concat2 (build_string ("~"), dir);
}
/* Likewise for default_filename. */
@ -6075,7 +6075,7 @@ provides a file dialog box. */)
{
default_filename
= Fsubstring (default_filename,
make_number (SCHARS (decoded_homedir) + 1), Qnil);
make_number (SCHARS (decoded_homedir)), Qnil);
default_filename = concat2 (build_string ("~"), default_filename);
}
if (!NILP (default_filename))