feature/workspaces: don't error when +workspace-p recieves nil
This commit is contained in:
parent
4c3652bede
commit
7aa8d54e08
1 changed files with 2 additions and 1 deletions
|
@ -30,7 +30,8 @@
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +workspace-p (obj)
|
(defun +workspace-p (obj)
|
||||||
"Return t if OBJ is a perspective hash table."
|
"Return t if OBJ is a perspective hash table."
|
||||||
(and (hash-table-p obj)
|
(and obj
|
||||||
|
(hash-table-p obj)
|
||||||
(perspective-p obj)))
|
(perspective-p obj)))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue