From: Glenn Morris <rgm@gnu.org>
Date: Wed, 17 Oct 2007 01:30:59 +0000 (+0000)
Subject: (Qcompletion_ignore_case): Change to external.
X-Git-Tag: emacs-pretest-22.1.90~593
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0af8c48ee0f56ee43bd788b26f96713724810771;p=emacs.git

(Qcompletion_ignore_case): Change to external.
(syms_of_dired) [VMS]: Remove Qcompletion_ignore_case.
---

diff --git a/src/dired.c b/src/dired.c
index 1fb5387268a..09c72f69fdf 100644
--- a/src/dired.c
+++ b/src/dired.c
@@ -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