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

Disable main workspace in noninteractive emacs

Browse source 
It is unnecessary in a noninteractive session.
This commit is contained in:
Henrik Lissner 2017-06-14 21:07:57 +02:00
parent 96ca709b23
commit c0791e0790
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 15 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

28
modules/feature/workspaces/config.el
View file

@ -51,20 +51,22 @@ renamed.")
(remove-hook 'delayed-warnings-hook #'display-delayed-warnings) (remove-hook 'delayed-warnings-hook #'display-delayed-warnings)
(defun +workspaces|init (&optional frame) (defun +workspaces|init (&optional frame)
(unless persp-mode
(persp-mode +1))
(let ((frame (or frame (selected-frame)))) (let ((frame (or frame (selected-frame))))
(unless persp-mode (unless noninteractive
(persp-mode +1)) ;; The default perspective persp-mode makes (defined by
;; The default perspective persp-mode makes (defined by `persp-nil-name') ;; `persp-nil-name') is special and doesn't actually represent a real
;; is special and doesn't actually represent a real persp object, so ;; persp object, so buffers can't really be assigned to it, among other
;; buffers can't really be assigned to it, among other quirks. We create a ;; quirks. We create a *real* main workspace to fill this role.
;; *real* main workspace to fill this role. (unless (persp-with-name-exists-p +workspaces-main)
(unless (persp-with-name-exists-p +workspaces-main) (persp-add-new +workspaces-main))
(persp-add-new +workspaces-main)) ;; Switch to it if we aren't auto-loading the last session
;; Switch to it if we aren't auto-loading the last session (when (or (equal (safe-persp-name (get-current-persp)) persp-nil-name)
(when (or (equal (safe-persp-name (get-current-persp)) persp-nil-name) (and (one-window-p)
(and (one-window-p) (eq (window-buffer (selected-window))
(eq (window-buffer (selected-window)) (doom-fallback-buffer)))) (doom-fallback-buffer))))
(persp-frame-switch +workspaces-main frame)) (persp-frame-switch +workspaces-main frame)))
(add-hook 'delayed-warnings-hook #'display-delayed-warnings t))) (add-hook 'delayed-warnings-hook #'display-delayed-warnings t)))
(define-key persp-mode-map [remap delete-window] #'+workspace/close-window-or-workspace) (define-key persp-mode-map [remap delete-window] #'+workspace/close-window-or-workspace)