diff options
| author | Kim F. Storm | 2005-06-08 22:33:36 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2005-06-08 22:33:36 +0000 |
| commit | 89f2614d96b5cf84f01c4903652a6a2b5b23d3d3 (patch) | |
| tree | 9aed849b4b7e3c1a44ba3bd3b6f09a0c3002c06a /src/process.c | |
| parent | 5fe2b5a58dc9d211eb523b11f2731b03b8bd525d (diff) | |
| download | emacs-89f2614d96b5cf84f01c4903652a6a2b5b23d3d3.tar.gz emacs-89f2614d96b5cf84f01c4903652a6a2b5b23d3d3.zip | |
* composite.c (compose_chars_in_text):
* eval.c (do_autoload):
* macmenu.c (set_frame_menubar):
* process.c (read_process_output, exec_sentinel):
* xmenu.c (set_frame_menubar):
* xdisp.c (prepare_menu_bars, update_menu_bar, update_tool_bar):
* w32menu.c (set_frame_menubar):
Use record_unwind_save_match_data.
Rename restore_match_data to restore_search_regs.
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/process.c b/src/process.c index d2d4390c501..0a4ee8aee46 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -4887,10 +4887,10 @@ read_process_output (proc, channel) | |||
| 4887 | { | 4887 | { |
| 4888 | Lisp_Object tem; | 4888 | Lisp_Object tem; |
| 4889 | /* Don't clobber the CURRENT match data, either! */ | 4889 | /* Don't clobber the CURRENT match data, either! */ |
| 4890 | tem = Fmatch_data (Qnil, Qnil); | 4890 | tem = Fmatch_data (Qnil, Qnil, Qnil); |
| 4891 | restore_match_data (); | 4891 | restore_search_regs (); |
| 4892 | record_unwind_protect (Fset_match_data, Fmatch_data (Qnil, Qnil)); | 4892 | record_unwind_save_match_data (); |
| 4893 | Fset_match_data (tem); | 4893 | Fset_match_data (tem, Qt); |
| 4894 | } | 4894 | } |
| 4895 | 4895 | ||
| 4896 | /* For speed, if a search happens within this code, | 4896 | /* For speed, if a search happens within this code, |
| @@ -4944,7 +4944,7 @@ read_process_output (proc, channel) | |||
| 4944 | read_process_output_error_handler); | 4944 | read_process_output_error_handler); |
| 4945 | 4945 | ||
| 4946 | /* If we saved the match data nonrecursively, restore it now. */ | 4946 | /* If we saved the match data nonrecursively, restore it now. */ |
| 4947 | restore_match_data (); | 4947 | restore_search_regs (); |
| 4948 | running_asynch_code = outer_running_asynch_code; | 4948 | running_asynch_code = outer_running_asynch_code; |
| 4949 | 4949 | ||
| 4950 | /* Handling the process output should not deactivate the mark. */ | 4950 | /* Handling the process output should not deactivate the mark. */ |
| @@ -6348,10 +6348,10 @@ exec_sentinel (proc, reason) | |||
| 6348 | if (outer_running_asynch_code) | 6348 | if (outer_running_asynch_code) |
| 6349 | { | 6349 | { |
| 6350 | Lisp_Object tem; | 6350 | Lisp_Object tem; |
| 6351 | tem = Fmatch_data (Qnil, Qnil); | 6351 | tem = Fmatch_data (Qnil, Qnil, Qnil); |
| 6352 | restore_match_data (); | 6352 | restore_search_regs (); |
| 6353 | record_unwind_protect (Fset_match_data, Fmatch_data (Qnil, Qnil)); | 6353 | record_unwind_save_match_data (); |
| 6354 | Fset_match_data (tem); | 6354 | Fset_match_data (tem, Qt); |
| 6355 | } | 6355 | } |
| 6356 | 6356 | ||
| 6357 | /* For speed, if a search happens within this code, | 6357 | /* For speed, if a search happens within this code, |
| @@ -6365,7 +6365,7 @@ exec_sentinel (proc, reason) | |||
| 6365 | exec_sentinel_error_handler); | 6365 | exec_sentinel_error_handler); |
| 6366 | 6366 | ||
| 6367 | /* If we saved the match data nonrecursively, restore it now. */ | 6367 | /* If we saved the match data nonrecursively, restore it now. */ |
| 6368 | restore_match_data (); | 6368 | restore_search_regs (); |
| 6369 | running_asynch_code = outer_running_asynch_code; | 6369 | running_asynch_code = outer_running_asynch_code; |
| 6370 | 6370 | ||
| 6371 | Vdeactivate_mark = odeactivate; | 6371 | Vdeactivate_mark = odeactivate; |