diff options
| -rw-r--r-- | prog/jao-vterm-repl.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/prog/jao-vterm-repl.el b/prog/jao-vterm-repl.el index 306042c..7954bd0 100644 --- a/prog/jao-vterm-repl.el +++ b/prog/jao-vterm-repl.el @@ -1,6 +1,6 @@ ;;; jao-vterm-repl.el --- vterm-based repls -*- lexical-binding: t; -*- -;; Copyright (C) 2020 jao +;; Copyright (C) 2020, 2021 jao ;; Author: jao <mail@jao.io> ;; Keywords: terminals @@ -44,7 +44,8 @@ (defun jao-vterm-repl--exec (cmd &optional name) (vterm name) - (when name (vterm-send-string "unset PROMPT_COMMAND\n")) + (when name + (vterm-send-string "unset PROMPT_COMMAND\n\n")) (vterm-send-string cmd) (vterm-send-return) (when name (rename-buffer name))) @@ -91,11 +92,10 @@ (prompt (cdr (assoc root-name jao-vterm-repl-prompts))) (cmd (or (cdr (assoc root-name jao-vterm-repl-repls)) (read-string "REPL command: ")))) - (jao-vterm-repl--exec cmd vname) + (jao-vterm-repl--exec cmd (format "* vrepl - %s *" root-name)) (jao-vterm-repl-mode) (setq-local jao-vterm-repl--name vname) (when prompt (setq-local jao-vterm-repl--prompt-rx prompt)) - (rename-buffer vname) (current-buffer))))) ;;;###autoload |