From: Richard M. Stallman Date: Thu, 19 Dec 1996 06:41:48 +0000 (+0000) Subject: (read_process_output, exec_sentinel): X-Git-Tag: emacs-20.1~3216 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dd13022778a9a064105d06534b9bbcb9019366dc;p=emacs.git (read_process_output, exec_sentinel): Call Fmatch_data with new explicit arguments. --- diff --git a/src/process.c b/src/process.c index 5d2f7133341..3325ffc1cea 100644 --- a/src/process.c +++ b/src/process.c @@ -2530,9 +2530,9 @@ read_process_output (proc, channel) { Lisp_Object tem; /* Don't clobber the CURRENT match data, either! */ - tem = Fmatch_data (); + tem = Fmatch_data (Qnil, Qnil); restore_match_data (); - record_unwind_protect (Fstore_match_data, Fmatch_data ()); + record_unwind_protect (Fstore_match_data, Fmatch_data (Qnil, Qnil)); Fstore_match_data (tem); } @@ -3562,9 +3562,9 @@ exec_sentinel (proc, reason) if (outer_running_asynch_code) { Lisp_Object tem; - tem = Fmatch_data (); + tem = Fmatch_data (Qnil, Qnil); restore_match_data (); - record_unwind_protect (Fstore_match_data, Fmatch_data ()); + record_unwind_protect (Fstore_match_data, Fmatch_data (Qnil, Qnil)); Fstore_match_data (tem); }