[Emacs-diffs] trunk r113539: * fileio.c (Finsert_file_contents): Use a more-conservative fix.

[Paul Eggert]

------------------------------------------------------------
revno: 113539
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/14936
committer: Paul Eggert <address@hidden>
branch nick: trunk
timestamp: Thu 2013-07-25 09:07:47 +0100
message:
  * fileio.c (Finsert_file_contents): Use a more-conservative fix.
modified:
  src/fileio.c                   fileio.c-20091113204419-o5vbwnq5f7feedwu-210

=== modified file 'src/fileio.c'
--- a/src/fileio.c      2013-07-25 07:29:36 +0000
+++ b/src/fileio.c      2013-07-25 08:07:47 +0000
@@ -3860,10 +3860,7 @@
       if (same_at_start - BEGV_BYTE == end_offset - beg_offset)
        {
          emacs_close (fd);
-
-         /* Discard the unwind protect for closing the file, and any
-            unwind protect for restoring point.  */
-         specpdl_ptr = specpdl + fd_index;
+         clear_unwind_protect (fd_index);
 
          /* Truncate the buffer to the size of the file.  */
          del_range_1 (same_at_start, same_at_end, 0, 0);