diff options
Diffstat (limited to 'src/fileio.c')
| -rw-r--r-- | src/fileio.c | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/src/fileio.c b/src/fileio.c index dfab3de9e94..0a14d64456b 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -187,9 +187,9 @@ report_file_errno (char const *string, Lisp_Object name, int errorno) | |||
| 187 | Lisp_Object data = CONSP (name) || NILP (name) ? name : list1 (name); | 187 | Lisp_Object data = CONSP (name) || NILP (name) ? name : list1 (name); |
| 188 | synchronize_system_messages_locale (); | 188 | synchronize_system_messages_locale (); |
| 189 | char *str = strerror (errorno); | 189 | char *str = strerror (errorno); |
| 190 | AUTO_STRING (unibyte_str, str); | ||
| 190 | Lisp_Object errstring | 191 | Lisp_Object errstring |
| 191 | = code_convert_string_norecord (build_unibyte_string (str), | 192 | = code_convert_string_norecord (unibyte_str, Vlocale_coding_system, 0); |
| 192 | Vlocale_coding_system, 0); | ||
| 193 | Lisp_Object errdata = Fcons (errstring, data); | 193 | Lisp_Object errdata = Fcons (errstring, data); |
| 194 | 194 | ||
| 195 | if (errorno == EEXIST) | 195 | if (errorno == EEXIST) |
| @@ -217,9 +217,9 @@ report_file_notify_error (const char *string, Lisp_Object name) | |||
| 217 | Lisp_Object data = CONSP (name) || NILP (name) ? name : list1 (name); | 217 | Lisp_Object data = CONSP (name) || NILP (name) ? name : list1 (name); |
| 218 | synchronize_system_messages_locale (); | 218 | synchronize_system_messages_locale (); |
| 219 | char *str = strerror (errno); | 219 | char *str = strerror (errno); |
| 220 | AUTO_STRING (unibyte_str, str); | ||
| 220 | Lisp_Object errstring | 221 | Lisp_Object errstring |
| 221 | = code_convert_string_norecord (build_unibyte_string (str), | 222 | = code_convert_string_norecord (unibyte_str, Vlocale_coding_system, 0); |
| 222 | Vlocale_coding_system, 0); | ||
| 223 | Lisp_Object errdata = Fcons (errstring, data); | 223 | Lisp_Object errdata = Fcons (errstring, data); |
| 224 | 224 | ||
| 225 | xsignal (Qfile_notify_error, Fcons (build_string (string), errdata)); | 225 | xsignal (Qfile_notify_error, Fcons (build_string (string), errdata)); |
| @@ -1015,11 +1015,9 @@ filesystem tree, not (expand-file-name ".." dirname). */) | |||
| 1015 | /* Drive must be set, so this is okay. */ | 1015 | /* Drive must be set, so this is okay. */ |
| 1016 | if (strcmp (nm - 2, SSDATA (name)) != 0) | 1016 | if (strcmp (nm - 2, SSDATA (name)) != 0) |
| 1017 | { | 1017 | { |
| 1018 | char temp[] = " :"; | ||
| 1019 | |||
| 1020 | name = make_specified_string (nm, -1, p - nm, multibyte); | 1018 | name = make_specified_string (nm, -1, p - nm, multibyte); |
| 1021 | temp[0] = DRIVE_LETTER (drive); | 1019 | char temp[] = { DRIVE_LETTER (drive), ':', 0 }; |
| 1022 | AUTO_STRING (drive_prefix, temp); | 1020 | AUTO_STRING_WITH_LEN (drive_prefix, temp, 2); |
| 1023 | name = concat2 (drive_prefix, name); | 1021 | name = concat2 (drive_prefix, name); |
| 1024 | } | 1022 | } |
| 1025 | #ifdef WINDOWSNT | 1023 | #ifdef WINDOWSNT |