# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 737791281 0
# Node ID 1ed91566882a30dff0f805f5959fcdb91b47d817
# Parent  646c5beae64761803bb2dc68fb6c82aab79f38da
	* fileio.c (Ffind_file_name_handler): Check that FILENAME is a
	string.

diff -r 646c5beae647 -r 1ed91566882a src/fileio.c
--- a/src/fileio.c	Wed May 19 05:41:37 1993 +0000
+++ b/src/fileio.c	Wed May 19 06:01:21 1993 +0000
@@ -174,6 +174,8 @@
 {
   /* This function must not munge the match data.  */
 
+  CHECK_STRING (filename, 0);
+
   Lisp_Object chain;
   for (chain = Vfile_name_handler_alist; XTYPE (chain) == Lisp_Cons;
        chain = XCONS (chain)->cdr)