Skip to content

Commit

Permalink
minor change
Browse files Browse the repository at this point in the history
  • Loading branch information
deftsp committed Sep 2, 2021
1 parent a78fde9 commit 6b62cf0
Showing 1 changed file with 9 additions and 7 deletions.
16 changes: 9 additions & 7 deletions lisp/13org-agenda.el
Expand Up @@ -576,13 +576,15 @@ If VANILLA is non-nil, run the standard `org-capture'."
(window-config
(if (= (length attrs) 1)
'reorganize-frame
(dolist (attr attrs)
(let ((name (assoc-default 'name attr))
(frames (assoc-default 'frames attr)))
(when (member (selected-frame) frames)
(if (string= name dottl-org-agenda-screen-name)
(return 'only-window)
(return 'other-frame))))))))
(if (string= (system-name) "PaloryN9")
(dolist (attr attrs)
(let ((name (assoc-default 'name attr))
(frames (assoc-default 'frames attr)))
(when (member (selected-frame) frames)
(if (string= name dottl-org-agenda-screen-name)
(return 'only-window)
(return 'other-frame)))))
'reorganize-frame))))
(setq org-agenda-window-setup window-config)))

;; (tl/update-org-agenda-window-setup)
Expand Down

0 comments on commit 6b62cf0

Please sign in to comment.