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

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

View file

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