# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 733561520 0
# Node ID b72453ad92ae2792a69a572b2e52b2177e1b433f
# Parent  39c696510c641278724a2b0947fd5f289ce672ac
(Fwrite_region): Don't fail to set visit_file.

diff -r 39c696510c64 -r b72453ad92ae src/fileio.c
--- a/src/fileio.c	Wed Mar 31 07:04:46 1993 +0000
+++ b/src/fileio.c	Wed Mar 31 07:05:20 1993 +0000
@@ -2506,7 +2506,7 @@
 
   filename = Fexpand_file_name (filename, Qnil);
   if (XTYPE (visit) == Lisp_String)
-    visit = Fexpand_file_name (visit, Qnil);
+    visit_file = Fexpand_file_name (visit, Qnil);
   else
     visit_file = filename;