diff options
Diffstat (limited to 'src/fileio.c')
| -rw-r--r-- | src/fileio.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/fileio.c b/src/fileio.c index 29d12a0b0c3..b0b9240c5ab 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -6163,6 +6163,7 @@ then any auto-save counts as "recent". */) | |||
| 6163 | 6163 | ||
| 6164 | /* Reading and completing file names */ | 6164 | /* Reading and completing file names */ |
| 6165 | extern Lisp_Object Ffile_name_completion (), Ffile_name_all_completions (); | 6165 | extern Lisp_Object Ffile_name_completion (), Ffile_name_all_completions (); |
| 6166 | extern Lisp_Object Qcompletion_ignore_case; | ||
| 6166 | 6167 | ||
| 6167 | /* In the string VAL, change each $ to $$ and return the result. */ | 6168 | /* In the string VAL, change each $ to $$ and return the result. */ |
| 6168 | 6169 | ||
| @@ -6468,7 +6469,7 @@ and `read-file-name-function'. */) | |||
| 6468 | } | 6469 | } |
| 6469 | 6470 | ||
| 6470 | count = SPECPDL_INDEX (); | 6471 | count = SPECPDL_INDEX (); |
| 6471 | specbind (intern ("completion-ignore-case"), | 6472 | specbind (Qcompletion_ignore_case, |
| 6472 | read_file_name_completion_ignore_case ? Qt : Qnil); | 6473 | read_file_name_completion_ignore_case ? Qt : Qnil); |
| 6473 | specbind (intern ("minibuffer-completing-file-name"), Qt); | 6474 | specbind (intern ("minibuffer-completing-file-name"), Qt); |
| 6474 | specbind (intern ("read-file-name-predicate"), | 6475 | specbind (intern ("read-file-name-predicate"), |