1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00

(comint-dynamic-complete-as-filename,comint-dynamic-list-filename-completions):

Use read-file-name-completion-ignore-case.
This commit is contained in:
Stefan Monnier 2007-07-12 04:14:48 +00:00
parent 2346acf6ba
commit c788d36681
2 changed files with 12 additions and 2 deletions

View File

@ -1,5 +1,15 @@
2007-07-12 Sean O'Rourke <sorourke@cs.ucsd.edu> (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 <monnier@iro.umontreal.ca>
* 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.

View File

@ -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.