# HG changeset patch # User Gerd Moellmann # Date 951083615 0 # Node ID eb273bf5c3a8c7313fab6f7b765dd3dae53d8c9c # Parent 2b3531e522df8df31c6ee4c943edfd2fd7c3a1b9 (Finsert_file_contents): Unbind the binding of standard-output done by temp_output_buffer_setup. diff -r 2b3531e522df -r eb273bf5c3a8 src/fileio.c --- a/src/fileio.c Sun Feb 20 19:03:33 2000 +0000 +++ b/src/fileio.c Sun Feb 20 21:53:35 2000 +0000 @@ -3543,9 +3543,15 @@ else if (nread > 0) { struct buffer *prev = current_buffer; + int count1; record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); + + /* The call to temp_output_buffer_setup binds + standard-output. */ + count1 = specpdl_ptr - specpdl; temp_output_buffer_setup (" *code-converting-work*"); + set_buffer_internal (XBUFFER (Vstandard_output)); current_buffer->enable_multibyte_characters = Qnil; insert_1_both (read_buf, nread, nread, 0, 0, 0); @@ -3553,6 +3559,10 @@ val = call2 (Vset_auto_coding_function, filename, make_number (nread)); set_buffer_internal (prev); + + /* Remove the binding for standard-output. */ + unbind_to (count1, Qnil); + /* Discard the unwind protect for recovering the current buffer. */ specpdl_ptr--;