diff options
| author | Richard M. Stallman | 2002-04-13 17:49:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2002-04-13 17:49:34 +0000 |
| commit | 685fc579ad33256c0aa4407db483ff27b20f32af (patch) | |
| tree | 025b2a5619812418bc179c474bc48ec37652a44c /src | |
| parent | 3fd9494be46a04a821c22759d80131ebc136c57c (diff) | |
| download | emacs-685fc579ad33256c0aa4407db483ff27b20f32af.tar.gz emacs-685fc579ad33256c0aa4407db483ff27b20f32af.zip | |
(Finsert_file_contents):
Don't call temp_output_buffer_setup--do just part, by hand.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 16 | ||||
| -rw-r--r-- | src/fileio.c | 25 |
2 files changed, 31 insertions, 10 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 8b02330ffef..0483eea4a42 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,19 @@ | |||
| 1 | 2002-04-13 Richard M. Stallman <rms@gnu.org> | ||
| 2 | |||
| 3 | * fileio.c (Finsert_file_contents): | ||
| 4 | Don't call temp_output_buffer_setup--do just part, by hand. | ||
| 5 | |||
| 6 | * coding.c (run_pre_post_conversion_on_str): | ||
| 7 | Don't call temp_output_buffer_setup--do just part, by hand. | ||
| 8 | |||
| 9 | * keyboard.c (command_loop_1): Don't call start_hourglass | ||
| 10 | or cancel_hourglass when executing a macro. | ||
| 11 | |||
| 12 | * marker.c (count_markers): New function. | ||
| 13 | |||
| 14 | * xdisp.c (display_mode_element): Don't let mode_line_proptrans_alist | ||
| 15 | grow without limit. Move recently used elements to the front. | ||
| 16 | |||
| 1 | 2002-04-13 Eli Zaretskii <eliz@is.elta.co.il> | 17 | 2002-04-13 Eli Zaretskii <eliz@is.elta.co.il> |
| 2 | 18 | ||
| 3 | * unexelf.c (unexec) [__sgi]: Undo the change from 2002-01-20. | 19 | * unexelf.c (unexec) [__sgi]: Undo the change from 2002-01-20. |
diff --git a/src/fileio.c b/src/fileio.c index 6abf102aa33..87a6a0da8bd 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -3777,25 +3777,30 @@ actually used. */) | |||
| 3777 | else if (nread > 0) | 3777 | else if (nread > 0) |
| 3778 | { | 3778 | { |
| 3779 | struct buffer *prev = current_buffer; | 3779 | struct buffer *prev = current_buffer; |
| 3780 | int count1; | 3780 | Lisp_Object buffer; |
| 3781 | struct buffer *buf; | ||
| 3781 | 3782 | ||
| 3782 | record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); | 3783 | record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); |
| 3783 | 3784 | ||
| 3784 | /* The call to temp_output_buffer_setup binds | 3785 | buffer = Fget_buffer_create (build_string (" *code-converting-work*")); |
| 3785 | standard-output. */ | 3786 | buf = XBUFFER (buffer); |
| 3786 | count1 = specpdl_ptr - specpdl; | 3787 | |
| 3787 | temp_output_buffer_setup (" *code-converting-work*"); | 3788 | buf->directory = current_buffer->directory; |
| 3789 | buf->read_only = Qnil; | ||
| 3790 | buf->filename = Qnil; | ||
| 3791 | buf->undo_list = Qt; | ||
| 3792 | buf->overlays_before = Qnil; | ||
| 3793 | buf->overlays_after = Qnil; | ||
| 3788 | 3794 | ||
| 3789 | set_buffer_internal (XBUFFER (Vstandard_output)); | 3795 | set_buffer_internal (buf); |
| 3790 | current_buffer->enable_multibyte_characters = Qnil; | 3796 | Ferase_buffer (); |
| 3797 | buf->enable_multibyte_characters = Qnil; | ||
| 3798 | |||
| 3791 | insert_1_both (read_buf, nread, nread, 0, 0, 0); | 3799 | insert_1_both (read_buf, nread, nread, 0, 0, 0); |
| 3792 | TEMP_SET_PT_BOTH (BEG, BEG_BYTE); | 3800 | TEMP_SET_PT_BOTH (BEG, BEG_BYTE); |
| 3793 | val = call2 (Vset_auto_coding_function, | 3801 | val = call2 (Vset_auto_coding_function, |
| 3794 | filename, make_number (nread)); | 3802 | filename, make_number (nread)); |
| 3795 | set_buffer_internal (prev); | 3803 | set_buffer_internal (prev); |
| 3796 | |||
| 3797 | /* Remove the binding for standard-output. */ | ||
| 3798 | unbind_to (count1, Qnil); | ||
| 3799 | 3804 | ||
| 3800 | /* Discard the unwind protect for recovering the | 3805 | /* Discard the unwind protect for recovering the |
| 3801 | current buffer. */ | 3806 | current buffer. */ |