Commit e7156492 authored by Andreas Schwab's avatar Andreas Schwab
Browse files

* lisp/comint.el (comint-dynamic-complete-as-filename)

(comint-dynamic-complete-filename): Correctly call
completion-in-region.
parent 172418ad
2011-06-05 Andreas Schwab <schwab@linux-m68k.org>
* comint.el (comint-dynamic-complete-as-filename)
(comint-dynamic-complete-filename): Correctly call
completion-in-region.
2011-06-05 Deniz Dogan <deniz@dogan.se>
* net/rcirc.el (rcirc-prompt-for-encryption): Fix bug introduced
......
......@@ -3035,7 +3035,8 @@ Returns t if successful."
(when (comint--match-partial-filename)
(unless (window-minibuffer-p (selected-window))
(message "Completing file name..."))
(apply #'completion-in-region (comint--complete-file-name-data))))
(let ((data (comint--complete-file-name-data)))
(completion-in-region (nth 0 data) (nth 1 data) (nth 2 data)))))
(defun comint-filename-completion ()
"Return completion data for filename at point, if any."
......@@ -3152,7 +3153,8 @@ in the same way as TABLE completes strings of the form (concat S2 S)."
(defun comint-dynamic-complete-as-filename ()
"Dynamically complete at point as a filename.
See `comint-dynamic-complete-filename'. Returns t if successful."
(apply #'completion-in-region (comint--complete-file-name-data)))
(let ((data (comint--complete-file-name-data)))
(completion-in-region (nth 0 data) (nth 1 data) (nth 2 data))))
(make-obsolete 'comint-dynamic-complete-as-filename
'comint-filename-completion "24.1")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment