No longer need to fill initial workspace list

Users are free to create as many as they like by hitting 'C-x 5 2' or running
`make-frame'.
This commit is contained in:
Urbano Ustero 2015-08-26 00:41:32 +02:00
parent 731cd74fdb
commit 22c7239f40

View file

@ -302,11 +302,6 @@ The optional FORCE option is for internal use only."
(cl-assert (= 1 (exwm-workspace--count)))
;; Prevent user from deleting this frame by accident
(set-frame-parameter (car exwm-workspace--list) 'client nil))
;; Create remaining frames
(dotimes (i (1- exwm-workspace-number))
(nconc exwm-workspace--list
(list (make-frame '((window-system . x)
(visibility . nil))))))
;; Configure workspaces
(dolist (i exwm-workspace--list)
(exwm-workspace--add-frame-as-workspace i))