Use different function for :cleanup

core/autoload/buffers.el

@@ -295,5 +295,3 @@ project."
     (when (called-interactively-p 'interactive)
       (message "Cleaned up %s buffers" n))))
 
-(after! evil
-  (evil-set-command-properties #'doom/cleanup-buffers :ex-bang t))

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

modules/private/hlissner/+commands.el

@@ -46,7 +46,9 @@
 (ex! "grevert"     #'git-gutter:revert-hunk)
 
 ;; Dealing with buffers
-(ex! "clean[up]"   #'doom/cleanup-buffers)
+(evil-set-command-properties #'+workspace/cleanup :ex-bang t)
+
+(ex! "clean[up]"   #'+workspace/cleanup)
 (ex! "k[ill]"      #'doom/kill-this-buffer)
 (ex! "k[ill]all"   #'+hlissner:kill-all-buffers)
 (ex! "k[ill]m"     #'+hlissner:kill-matching-buffers)