From c788d366815aba6e70d2786d1bf5894a45e8b326 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 12 Jul 2007 04:14:48 +0000 Subject: [PATCH] (comint-dynamic-complete-as-filename,comint-dynamic-list-filename-completions): Use read-file-name-completion-ignore-case. --- lisp/ChangeLog | 10 ++++++++++ lisp/comint.el | 4 ++-- 2 files changed, 12 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e5273d5e7d9..e21e1ce5bcd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,15 @@ +2007-07-12 Sean O'Rourke (tiny change) + + * pcomplete.el (pcomplete-entries): Obey pcomplete-ignore-case. + + * comint.el (comint-dynamic-complete-as-filename): + Use read-file-name-completion-ignore-case. + 2007-07-12 Stefan Monnier + * comint.el (comint-dynamic-list-filename-completions): + Use read-file-name-completion-ignore-case. + * vc-cvs.el: Require CL. (vc-cvs-revision-table, vc-cvs-revision-completion-table): New functions to provide completion of revision names. diff --git a/lisp/comint.el b/lisp/comint.el index bf53741f658..ddc3a2f503b 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -2805,7 +2805,7 @@ Returns t if successful." (defun comint-dynamic-complete-as-filename () "Dynamically complete at point as a filename. See `comint-dynamic-complete-filename'. Returns t if successful." - (let* ((completion-ignore-case (memq system-type '(ms-dos windows-nt cygwin))) + (let* ((completion-ignore-case read-file-name-completion-ignore-case) (completion-ignored-extensions comint-completion-fignore) ;; If we bind this, it breaks remote directory tracking in rlogin.el. ;; I think it was originally bound to solve file completion problems, @@ -2934,7 +2934,7 @@ See also `comint-dynamic-complete-filename'." (defun comint-dynamic-list-filename-completions () "List in help buffer possible completions of the filename at point." (interactive) - (let* ((completion-ignore-case (memq system-type '(ms-dos windows-nt cygwin))) + (let* ((completion-ignore-case read-file-name-completion-ignore-case) ;; If we bind this, it breaks remote directory tracking in rlogin.el. ;; I think it was originally bound to solve file completion problems, ;; but subsequent changes may have made this unnecessary. sm. -- 2.39.2