summaryrefslogtreecommitdiff
path: root/lisp/shell.el
diff options
context:
space:
mode:
authorMarkus Rost <rost@math.uni-bielefeld.de>2003-08-12 23:37:25 +0000
committerMarkus Rost <rost@math.uni-bielefeld.de>2003-08-12 23:37:25 +0000
commitaafd10935188ec46cf8937fd38d6504a69ca8a87 (patch)
tree961e9031129bc0479b72a8d2b6cb868639ea1024 /lisp/shell.el
parent8b9177ce1bc5abadf4bb7e51a917df76a7b62003 (diff)
downloademacs-aafd10935188ec46cf8937fd38d6504a69ca8a87.tar.gz
(shell): With prefix-arg, suggest a new buffer name.
Diffstat (limited to 'lisp/shell.el')
-rw-r--r--lisp/shell.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/shell.el b/lisp/shell.el
index fdf80cba220..b220b85fbbe 100644
--- a/lisp/shell.el
+++ b/lisp/shell.el
@@ -533,7 +533,8 @@ Otherwise, one argument `-i' is passed to the shell.
(interactive
(list
(and current-prefix-arg
- (read-buffer "Shell buffer: " "*shell*"))))
+ (read-buffer "Shell buffer: "
+ (generate-new-buffer-name "*shell*")))))
(setq buffer (get-buffer-create (or buffer "*shell*")))
;; Pop to buffer, so that the buffer's window will be correctly set
;; when we call comint (so that comint sets the COLUMNS env var properly).