From: Kenichi Handa <handa@m17n.org>
Date: Thu, 12 Jun 2003 23:23:48 +0000 (+0000)
Subject: (Fwrite_region): Save and restore restriction.
X-Git-Tag: ttn-vms-21-2-B4~9663
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4a38de71d8c8e815b1897b0031d41edad790cc56;p=emacs.git

(Fwrite_region): Save and restore restriction.
---

diff --git a/src/fileio.c b/src/fileio.c
index b308a4b3852..db5cab44756 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -4892,11 +4892,14 @@ This does code conversion according to the value of
       return val;
     }
 
+  record_unwind_protect (save_restriction_restore, save_restriction_save ());
+
   /* Special kludge to simplify auto-saving.  */
   if (NILP (start))
     {
       XSETFASTINT (start, BEG);
       XSETFASTINT (end, Z);
+      Fwiden ();
     }
 
   record_unwind_protect (build_annotations_unwind, Fcurrent_buffer ());