Commit b537a6c7 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fread_file_name): Check type of DEFAULT_FILENAME.

parent 94b04180
......@@ -5451,7 +5451,10 @@ DIR defaults to current buffer's directory default.")
XSTRING (default_filename)->data[0] = '~';
}
if (!NILP (default_filename))
default_filename = double_dollars (default_filename);
{
CHECK_STRING (default_filename, 3);
default_filename = double_dollars (default_filename);
}
if (insert_default_directory && STRINGP (dir))
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment