# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1184213755 0
# Node ID d3277da9359889f440c83c51f0e591a2fa0562b0
# Parent  64c8ecd78bf2eac7874d41b7667839c93dd3f9e2
(pcomplete-entries): Obey pcomplete-ignore-case.

diff -r 64c8ecd78bf2 -r d3277da93598 lisp/pcomplete.el
--- a/lisp/pcomplete.el	Thu Jul 12 04:14:48 2007 +0000
+++ b/lisp/pcomplete.el	Thu Jul 12 04:15:55 2007 +0000
@@ -711,6 +711,7 @@
 If no directory information can be extracted from the completed
 component, `default-directory' is used as the basis for completion."
   (let* ((name (substitute-env-vars pcomplete-stub))
+         (completion-ignore-case pcomplete-ignore-case)
 	 (default-directory (expand-file-name
 			     (or (file-name-directory name)
 				 default-directory)))