Lines Matching defs:default_filename
6312 (prompt, dir, default_filename, mustmatch, initial, predicate)
6313 Lisp_Object prompt, dir, default_filename, mustmatch, initial, predicate;
6327 if (NILP (default_filename))
6328 default_filename
6356 /* Likewise for default_filename. */
6358 && STRINGP (default_filename)
6359 && !strncmp (SDATA (decoded_homedir), SDATA (default_filename),
6361 && IS_DIRECTORY_SEP (SREF (default_filename, SBYTES (decoded_homedir))))
6363 default_filename
6364 = Fsubstring (default_filename,
6366 default_filename = concat2 (build_string ("~"), default_filename);
6368 if (!NILP (default_filename))
6370 CHECK_STRING (default_filename);
6371 default_filename = double_dollars (default_filename);
6399 GCPRO2 (insdef, default_filename);
6403 args[3] = default_filename;
6417 GCPRO2 (insdef, default_filename);
6425 if (SCHARS (file) && NILP (default_filename))
6427 default_filename = file;
6430 if (!NILP(default_filename))
6431 default_filename = Fexpand_file_name (default_filename, dir);
6432 val = Fx_file_dialog (prompt, dir, default_filename, mustmatch,
6440 Qfile_name_history, default_filename, Qnil);
6451 if (EQ (val, default_filename))
6468 if (!NILP (tem) && !NILP (default_filename))
6469 val = default_filename;