Fix +workspace/delete when one workspace is left

This commit is contained in:
Henrik Lissner
2018-05-29 00:42:33 +02:00
parent edc09ecab8
commit e2979e5b82

View File

@ -289,8 +289,8 @@ workspace to delete."
nil nil current-name)
current-name))))
(condition-case-unless-debug ex
(let ((workspaces (length (+workspace-list-names))))
(cond ((> workspaces 1)
(let ((workspaces (+workspace-list-names)))
(cond ((> (length workspaces) 1)
(+workspace-delete name)
(+workspace-switch
(if (+workspace-exists-p +workspace--last)