Mercurial > emacs

comparison src/dired.c @ 79109:78939f1449b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Qcompletion_ignore_case): Change to external. (syms_of_dired) [VMS]: Remove Qcompletion_ignore_case.
author Glenn Morris <rgm@gnu.org>
date Wed, 17 Oct 2007 01:30:59 +0000
parents 1677cf1c2509
children fc2bcd2a8aad 1251cabc40b7
comparison
equal deleted inserted replaced
79108:f197bd049c23 79109:78939f1449b7
113 #ifndef S_IFLNK 113 #ifndef S_IFLNK
114 #define lstat stat 114 #define lstat stat
115 #endif 115 #endif
116 116
117 extern int completion_ignore_case; 117 extern int completion_ignore_case;
118 extern Lisp_Object Qcompletion_ignore_case;
118 extern Lisp_Object Vcompletion_regexp_list; 119 extern Lisp_Object Vcompletion_regexp_list;
119 120
120 Lisp_Object Vcompletion_ignored_extensions; 121 Lisp_Object Vcompletion_ignored_extensions;
121 Lisp_Object Qcompletion_ignore_case;
122 Lisp_Object Qdirectory_files; 122 Lisp_Object Qdirectory_files;
123 Lisp_Object Qdirectory_files_and_attributes; 123 Lisp_Object Qdirectory_files_and_attributes;
124 Lisp_Object Qfile_name_completion; 124 Lisp_Object Qfile_name_completion;
125 Lisp_Object Qfile_name_all_completions; 125 Lisp_Object Qfile_name_all_completions;
126 Lisp_Object Qfile_attributes; 126 Lisp_Object Qfile_attributes;
1075 #endif /* VMS */ 1075 #endif /* VMS */
1076 defsubr (&Sfile_name_all_completions); 1076 defsubr (&Sfile_name_all_completions);
1077 defsubr (&Sfile_attributes); 1077 defsubr (&Sfile_attributes);
1078 defsubr (&Sfile_attributes_lessp); 1078 defsubr (&Sfile_attributes_lessp);
1079 1079
1080 #ifdef VMS
1081 Qcompletion_ignore_case = intern ("completion-ignore-case");
1082 staticpro (&Qcompletion_ignore_case);
1083 #endif /* VMS */
1084
1085 DEFVAR_LISP ("completion-ignored-extensions", &Vcompletion_ignored_extensions, 1080 DEFVAR_LISP ("completion-ignored-extensions", &Vcompletion_ignored_extensions,
1086 doc: /* Completion ignores file names ending in any string in this list. 1081 doc: /* Completion ignores file names ending in any string in this list.
1087 It does not ignore them if all possible completions end in one of 1082 It does not ignore them if all possible completions end in one of
1088 these strings or when displaying a list of completions. 1083 these strings or when displaying a list of completions.
1089 It ignores directory names if they match any string in this list which 1084 It ignores directory names if they match any string in this list which