(Qcompletion_ignore_case): Change to external.
(syms_of_dired) [VMS]: Remove Qcompletion_ignore_case.
This commit is contained in:
parent
b46d7a8abb
commit
0af8c48ee0
1 changed files with 1 additions and 6 deletions
|
@ -115,10 +115,10 @@ extern void filemodestring P_ ((struct stat *, char *));
|
|||
#endif
|
||||
|
||||
extern int completion_ignore_case;
|
||||
extern Lisp_Object Qcompletion_ignore_case;
|
||||
extern Lisp_Object Vcompletion_regexp_list;
|
||||
|
||||
Lisp_Object Vcompletion_ignored_extensions;
|
||||
Lisp_Object Qcompletion_ignore_case;
|
||||
Lisp_Object Qdirectory_files;
|
||||
Lisp_Object Qdirectory_files_and_attributes;
|
||||
Lisp_Object Qfile_name_completion;
|
||||
|
@ -1077,11 +1077,6 @@ syms_of_dired ()
|
|||
defsubr (&Sfile_attributes);
|
||||
defsubr (&Sfile_attributes_lessp);
|
||||
|
||||
#ifdef VMS
|
||||
Qcompletion_ignore_case = intern ("completion-ignore-case");
|
||||
staticpro (&Qcompletion_ignore_case);
|
||||
#endif /* VMS */
|
||||
|
||||
DEFVAR_LISP ("completion-ignored-extensions", &Vcompletion_ignored_extensions,
|
||||
doc: /* Completion ignores file names ending in any string in this list.
|
||||
It does not ignore them if all possible completions end in one of
|
||||
|
|
Loading…
Add table
Reference in a new issue