diff options
Diffstat (limited to 'src/callproc.c')
| -rw-r--r-- | src/callproc.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/callproc.c b/src/callproc.c index f2543f296d5..bdd3060bef1 100644 --- a/src/callproc.c +++ b/src/callproc.c | |||
| @@ -265,7 +265,7 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) | |||
| 265 | 265 | ||
| 266 | if (nargs >= 2 && ! NILP (args[1])) | 266 | if (nargs >= 2 && ! NILP (args[1])) |
| 267 | { | 267 | { |
| 268 | infile = Fexpand_file_name (args[1], current_buffer->directory); | 268 | infile = Fexpand_file_name (args[1], B_ (current_buffer, directory)); |
| 269 | CHECK_STRING (infile); | 269 | CHECK_STRING (infile); |
| 270 | } | 270 | } |
| 271 | else | 271 | else |
| @@ -322,7 +322,7 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) | |||
| 322 | { | 322 | { |
| 323 | struct gcpro gcpro1, gcpro2, gcpro3, gcpro4; | 323 | struct gcpro gcpro1, gcpro2, gcpro3, gcpro4; |
| 324 | 324 | ||
| 325 | current_dir = current_buffer->directory; | 325 | current_dir = B_ (current_buffer, directory); |
| 326 | 326 | ||
| 327 | GCPRO4 (infile, buffer, current_dir, error_file); | 327 | GCPRO4 (infile, buffer, current_dir, error_file); |
| 328 | 328 | ||
| @@ -336,7 +336,7 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) | |||
| 336 | 336 | ||
| 337 | if (NILP (Ffile_accessible_directory_p (current_dir))) | 337 | if (NILP (Ffile_accessible_directory_p (current_dir))) |
| 338 | report_file_error ("Setting current directory", | 338 | report_file_error ("Setting current directory", |
| 339 | Fcons (current_buffer->directory, Qnil)); | 339 | Fcons (B_ (current_buffer, directory), Qnil)); |
| 340 | 340 | ||
| 341 | if (STRING_MULTIBYTE (infile)) | 341 | if (STRING_MULTIBYTE (infile)) |
| 342 | infile = ENCODE_FILE (infile); | 342 | infile = ENCODE_FILE (infile); |
| @@ -663,7 +663,7 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) | |||
| 663 | /* In unibyte mode, character code conversion should not take | 663 | /* In unibyte mode, character code conversion should not take |
| 664 | place but EOL conversion should. So, setup raw-text or one | 664 | place but EOL conversion should. So, setup raw-text or one |
| 665 | of the subsidiary according to the information just setup. */ | 665 | of the subsidiary according to the information just setup. */ |
| 666 | if (NILP (current_buffer->enable_multibyte_characters) | 666 | if (NILP (B_ (current_buffer, enable_multibyte_characters)) |
| 667 | && !NILP (val)) | 667 | && !NILP (val)) |
| 668 | val = raw_text_coding_system (val); | 668 | val = raw_text_coding_system (val); |
| 669 | setup_coding_system (val, &process_coding); | 669 | setup_coding_system (val, &process_coding); |
| @@ -713,7 +713,7 @@ usage: (call-process PROGRAM &optional INFILE BUFFER DISPLAY &rest ARGS) */) | |||
| 713 | 713 | ||
| 714 | if (!NILP (buffer)) | 714 | if (!NILP (buffer)) |
| 715 | { | 715 | { |
| 716 | if (NILP (current_buffer->enable_multibyte_characters) | 716 | if (NILP (B_ (current_buffer, enable_multibyte_characters)) |
| 717 | && ! CODING_MAY_REQUIRE_DECODING (&process_coding)) | 717 | && ! CODING_MAY_REQUIRE_DECODING (&process_coding)) |
| 718 | insert_1_both (buf, nread, nread, 0, 1, 0); | 718 | insert_1_both (buf, nread, nread, 0, 1, 0); |
| 719 | else | 719 | else |
| @@ -926,7 +926,7 @@ usage: (call-process-region START END PROGRAM &optional DELETE BUFFER DISPLAY &r | |||
| 926 | /* Decide coding-system of the contents of the temporary file. */ | 926 | /* Decide coding-system of the contents of the temporary file. */ |
| 927 | if (!NILP (Vcoding_system_for_write)) | 927 | if (!NILP (Vcoding_system_for_write)) |
| 928 | val = Vcoding_system_for_write; | 928 | val = Vcoding_system_for_write; |
| 929 | else if (NILP (current_buffer->enable_multibyte_characters)) | 929 | else if (NILP (B_ (current_buffer, enable_multibyte_characters))) |
| 930 | val = Qraw_text; | 930 | val = Qraw_text; |
| 931 | else | 931 | else |
| 932 | { | 932 | { |