From 7f27ada42c3342ed80354cd684f310a6c2d23db8 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 7 May 1997 07:26:10 +0000 Subject: (Fread_file_name): Pass default to Fcompleting_read. --- src/fileio.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/fileio.c b/src/fileio.c index 6560f28bb70..9caa355dac5 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -4854,7 +4854,7 @@ DIR defaults to current buffer's directory default.") GCPRO2 (insdef, default_filename); val = Fcompleting_read (prompt, intern ("read-file-name-internal"), dir, mustmatch, insdef1, - Qfile_name_history); + Qfile_name_history, default_filename); #ifdef VMS unbind_to (count, Qnil); -- cgit v1.2.1