diff --git a/init.el b/init.el index c554a68..774fbd7 100644 --- a/init.el +++ b/init.el @@ -3095,16 +3095,17 @@ Actually, return the method name." (visual-wrap-prefix-mode -1)) (defun my/project-vterm (&optional arg prompt) "Switch to or create a vterm buffer in the current projects root." - (interactive (list current-prefix-arg t)) + (interactive (list (prefix-numeric-value current-prefix-arg) t)) (if-let* ((proj (project-current prompt)) (default-directory (project-root proj))) - (let ((vterm-buffer-name (format "*vterm for project %s*" default-directory)) - (vterm-shell (my/-vterm-shell-for-cwd))) + (let ((vterm-shell (my/-vterm-shell-for-cwd)) + (vterm-buffer-name (format "*vterm for project %s*" + default-directory))) (vterm arg)))) (defun my/project-vterm-or-default (&optional arg) "Open a vterm for the current project, otherwise, open a normal vterm." (interactive "P") - (unless (my/project-vterm) + (unless (my/project-vterm arg) (let ((vterm-shell (my/-vterm-shell-for-cwd))) (vterm arg)))))