Don't take mvti as an argument

This commit is contained in:
Benson Chu 2025-05-06 18:12:21 -05:00
parent 06d35358e4
commit a584bcc210

View file

@ -44,14 +44,13 @@
(defvar mvt/regex
(rx (and "*" (group (+ nonl)) "-vterm<" (group (+ digit)) ">" "*")))
(defun mvt/create-buffer (tab-name mvti)
(defun mvt/create-buffer (tab-name)
(interactive
(let ((name (alist-get 'name (tab-bar--current-tab))))
(list name
(gethash (intern name) mvt/info))))
(let ((index (or (pop (slot-value mvti 'free-numbers))
(cl-incf (slot-value mvti 'max-number))))
vterm-name)
(list (alist-get 'name (tab-bar--current-tab))))
(let* ((mvti (gethash (intern tab-name) mvt/info))
(index (or (pop (slot-value mvti 'free-numbers))
(cl-incf (slot-value mvti 'max-number))))
vterm-name)
(setq vterm-name (mvt/format-buffer-name tab-name index))
(-->
(or (get-buffer vterm-name)