diff --git a/modules/feature/workspaces/autoload/workspaces.el b/modules/feature/workspaces/autoload/workspaces.el index f27ee18a9..ce70c67f6 100644 --- a/modules/feature/workspaces/autoload/workspaces.el +++ b/modules/feature/workspaces/autoload/workspaces.el @@ -81,6 +81,13 @@ perspectives." "Get the name of the currently active workspace." (safe-persp-name (get-current-persp))) +;;;###autoload +(defun +workspace-contains-buffer-p (&optional buffer workspace) + "Return non-nil if buffer is in workspace (defaults to current workspace)." + (unless workspace + (setq workspace (+workspace-current))) + (persp-contain-buffer-p buffer workspace nil)) + ;;;###autoload (defun +workspace-load (name) "Loads and inserts a single workspace (named NAME) into the current session.