delete-frame when (eq (window-deletable-p) 'frame) in vterm-toggle--e…

…xit-hook
jixiuf · Jun 10, 2023 · b189a2b · b189a2b
1 parent b94522e
commit b189a2b
Showing 1 changed file with 7 additions and 3 deletions.
diff --git a/vterm-toggle.el b/vterm-toggle.el
@@ -412,9 +412,13 @@ Optional argument ARGS optional args."
     (setq vterm-toggle--buffer-list
           (delq (current-buffer) vterm-toggle--buffer-list))
     (if (eq vterm-toggle-reset-window-configration-after-exit 'kill-window-only)
-        (if (window-deletable-p)
-            (delete-window)
-          (quit-window))
+        (cond
+         ((eq (window-deletable-p) 'frame)
+          (delete-frame))
+         ((eq (window-deletable-p) t)
+          (delete-window))
+         (t
+          (quit-window)))
       (when (and vterm-toggle-reset-window-configration-after-exit
                  vterm-toggle--window-configration)
         (set-window-configuration vterm-toggle--window-configration)))))