awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-09 12:57:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

feature/workspace: fix frames incorrectly initialized via emacsclient

Browse Source 
A new workspace is now correctly created for files opened via
emacsclient. This fixes #119. Again.
This commit is contained in:
Henrik Lissner
2018-01-31 01:13:56 -05:00
parent 9d82318d27
commit 81bba9c0bc
2 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
modules/feature/workspaces/autoload/workspaces.el
View File

@ -445,11 +445,13 @@ the next."
;;
;;;###autoload
(defun +workspaces|delete-associated-workspace (frame)
(defun +workspaces|delete-associated-workspace (&optional frame)
"Delete workspace associated with current frame.
A workspace gets associated with a frame when a new frame is interactively
created."
(when persp-mode
(unless frame
(setq frame (selected-frame)))
(let ((frame-persp (frame-parameter frame 'workspace)))
(when (string= frame-persp (+workspace-current-name))
(+workspace/delete frame-persp)))))
@ -470,9 +472,9 @@ created."
(with-selected-frame frame
(if (not (persp-frame-list-without-daemon))
(+workspace-switch +workspaces-main t)
(+workspace/new)
(+workspace-switch (format "#%s" (+workspace--generate-id)) t)
(set-frame-parameter frame 'workspace (+workspace-current-name)))
(+workspace/display))))
(run-at-time 0.1 nil #'+workspace/display))))
(defvar +workspaces--project-dir nil)
;;;###autoload