aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKenichi Handa2003-03-19 12:09:37 +0000
committerKenichi Handa2003-03-19 12:09:37 +0000
commit602040466d9273df9682fcce612a17586db3c20a (patch)
tree767f3bdca7bc8defc616b6d84b726de0dece511d /src
parent4f497b0aab641e8c36f55f43b363d9da58758b7f (diff)
downloademacs-602040466d9273df9682fcce612a17586db3c20a.tar.gz
emacs-602040466d9273df9682fcce612a17586db3c20a.zip
(Fread_file_name): Fix previous change.
Diffstat (limited to 'src')
-rw-r--r--src/fileio.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fileio.c b/src/fileio.c
index f7bfdc16f9d..a75a0e22b75 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -6063,7 +6063,7 @@ provides a file dialog box. */)
6063 SBYTES (decoded_homedir)) 6063 SBYTES (decoded_homedir))
6064 && IS_DIRECTORY_SEP (SREF (dir, SBYTES (decoded_homedir)))) 6064 && IS_DIRECTORY_SEP (SREF (dir, SBYTES (decoded_homedir))))
6065 { 6065 {
6066 dir = Fsubstring (dir, make_number (SCHARS (decoded_homedir) + 1), Qnil); 6066 dir = Fsubstring (dir, make_number (SCHARS (decoded_homedir)), Qnil);
6067 dir = concat2 (build_string ("~"), dir); 6067 dir = concat2 (build_string ("~"), dir);
6068 } 6068 }
6069 /* Likewise for default_filename. */ 6069 /* Likewise for default_filename. */
@@ -6075,7 +6075,7 @@ provides a file dialog box. */)
6075 { 6075 {
6076 default_filename 6076 default_filename
6077 = Fsubstring (default_filename, 6077 = Fsubstring (default_filename,
6078 make_number (SCHARS (decoded_homedir) + 1), Qnil); 6078 make_number (SCHARS (decoded_homedir)), Qnil);
6079 default_filename = concat2 (build_string ("~"), default_filename); 6079 default_filename = concat2 (build_string ("~"), default_filename);
6080 } 6080 }
6081 if (!NILP (default_filename)) 6081 if (!NILP (default_filename))