Use different function for :cleanup

modules/feature/workspaces/autoload/workspaces.el

@@ -357,6 +357,17 @@ the workspace and move to the next."
             ((> (length (+workspace-list)) 1)
              (+workspace/delete current-persp-name))))))
 
+;;;###autoload
+(defun +workspace/cleanup ()
+  "Clean up orphaned buffers and processes."
+  (interactive)
+  (let ((buffers (cl-remove-if #'persp--buffer-in-persps (buffer-list)))
+        (n (doom-kill-process-buffers)))
+    (mapc #'kill-buffer buffers)
+    (when (called-interactively-p 'any)
+      (message "Cleaned up %d buffers and %d processes"
+               (length buffers) n))))
+
 
 ;;
 ;; Tabs display in minibuffer