1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

(inferior-lisp): Use pop-to-buffer.

Add *inferior-lisp* to same-window-buffer-names.
This commit is contained in:
Richard M. Stallman 1995-08-16 14:41:11 +00:00
parent 349a5b097b
commit 14a9bcda67

View File

@ -283,7 +283,8 @@ of `inferior-lisp-program'). Runs the hooks from
"inferior-lisp" (car cmdlist) nil (cdr cmdlist)))
(inferior-lisp-mode)))
(setq inferior-lisp-buffer "*inferior-lisp*")
(switch-to-buffer "*inferior-lisp*"))
(pop-to-buffer "*inferior-lisp*"))
;;;###autoload (add-hook 'same-window-buffer-names "*inferior-lisp*")
;;;###autoload
(defalias 'run-lisp 'inferior-lisp)