From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 4 Sep 2021 06:59:14 +0000 (+0200)
Subject: Make `M-x term' offer completion
X-Git-Tag: emacs-28.0.90~1190
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c6b1f8daa74b2a7061ba8a378c92bdab870c25f4;p=emacs.git

Make `M-x term' offer completion

* lisp/term.el (term): Have completion in the prompt (bug#21296).
---

diff --git a/lisp/term.el b/lisp/term.el
index b3870a814d2..0bcd095283a 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -1429,10 +1429,10 @@ The buffer is in Term mode; see `term-mode' for the
 commands to use in that buffer.
 
 \\<term-raw-map>Type \\[switch-to-buffer] to switch to another buffer."
-  (interactive (list (read-from-minibuffer "Run program: "
-					   (or explicit-shell-file-name
-					       (getenv "ESHELL")
-					       shell-file-name))))
+  (interactive (list (read-shell-command "Run program: "
+					 (or explicit-shell-file-name
+					     (getenv "ESHELL")
+					     shell-file-name))))
   (set-buffer (make-term "terminal" program))
   (term-mode)
   (term-char-mode)