# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 760254996 0
# Node ID 23821c197271eeb5346c7862fd4049476b6da721
# Parent  a2346a4ebfe24069522ee681efb4ca96a968a2a3
(Fwrite_region): If FILENAME has no handler, see if VISIT has one.

diff -r a2346a4ebfe2 -r 23821c197271 src/fileio.c
--- a/src/fileio.c	Thu Feb 03 05:55:12 1994 +0000
+++ b/src/fileio.c	Thu Feb 03 05:56:36 1994 +0000
@@ -2803,6 +2803,9 @@
   /* If the file name has special constructs in it,
      call the corresponding file handler.  */
   handler = Ffind_file_name_handler (filename);
+  /* If FILENAME has no handler, see if VISIT has one.  */
+  if (NILP (handler) && XTYPE (visit) == Lisp_String)
+    handler = Ffind_file_name_handler (visit);    
 
   if (!NILP (handler))
     {