* callproc.c (encode_current_directory): Encode dir at the end.

This commit is contained in:
Michael Albinus 2014-11-07 21:09:34 +01:00
parent 06ee88e490
commit 499a7f1cdb

View file

@ -150,8 +150,6 @@ encode_current_directory (void)
dir = expand_and_dir_to_file (dir, Qnil);
if (STRING_MULTIBYTE (dir))
dir = ENCODE_FILE (dir);
if (NILP (Ffile_accessible_directory_p (dir)))
report_file_error ("Setting current directory",
BVAR (current_buffer, directory));
@ -160,6 +158,9 @@ encode_current_directory (void)
if (! NILP (Fstring_match (build_string ("^/:"), dir, Qnil)))
dir = Fsubstring (dir, make_number (2), Qnil);
if (STRING_MULTIBYTE (dir))
dir = ENCODE_FILE (dir);
RETURN_UNGCPRO (dir);
}