Add +workspace-contains-buffer-p
This commit is contained in:
parent
30001ec3f4
commit
5a386446aa
1 changed files with 7 additions and 0 deletions
|
@ -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.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue