emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

+workspace-contains-buffer-p -> persp-contain-buffer-p

Browse source 
Wrapper is unnecessary.

Also remove unnecessary type checking.
This commit is contained in:
Henrik Lissner 2018-07-09 21:53:50 +02:00
parent c760bf7205
commit 34de826ac4
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 2 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

6
modules/feature/workspaces/autoload/workspaces.el
View file

@ -38,13 +38,11 @@
;;;###autoload ;;;###autoload
(defun +workspace-exists-p (name) (defun +workspace-exists-p (name)
"Returns t if NAME is the name of an existing workspace." "Returns t if NAME is the name of an existing workspace."
(cl-check-type name string)
(member name (+workspace-list-names))) (member name (+workspace-list-names)))
;;;###autoload ;;;###autoload
(defun +workspace-contains-buffer-p (buffer &optional workspace) (defalias #'+workspace-contains-buffer-p #'persp-contain-buffer-p
"Return non-nil if BUFFER is in WORKSPACE (defaults to current workspace)." "Return non-nil if BUFFER is in WORKSPACE (defaults to current workspace).")
(persp-contain-buffer-p buffer (or workspace (+workspace-current)) nil))
;; --- Getters ---------------------------- ;; --- Getters ----------------------------