aboutsummaryrefslogtreecommitdiffstats
path: root/src/callproc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/callproc.c')
-rw-r--r--src/callproc.c12
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 {