[Emacs] Use frames in org-mode when frame-mode enabled

This commit is contained in:
Ivan Malison 2017-08-25 12:49:35 -07:00
parent f52e3a97b2
commit e06a2e1a1d
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -1164,6 +1164,12 @@ it on by default. Its probably safe to turn it on when in a programming mode.
:demand t :demand t
:config :config
(progn (progn
(defun imalison:maybe-use-frames-for-org (&rest args)
(let ((fn (if frame-mode 'org-switch-to-buffer-other-window
'switch-to-buffer-other-frame)))
(apply fn args)))
(advice-add 'org-switch-to-buffer-other-window
:override 'imalison:maybe-use-frames-for-org)
(add-hook 'frame-mode-hook (lambda () (display-time-mode -1))) (add-hook 'frame-mode-hook (lambda () (display-time-mode -1)))
(frame-mode +1) (frame-mode +1)
(frame-keys-mode +1))) (frame-keys-mode +1)))