启动 Emacs，左边是 org 文件，右边是议程

Question

我想开Emacs全屏，两个windows垂直分割。 我希望我的 todo.org 文件在左侧打开，我的议程视图在右侧打开。

类似的内容出现在本网站的其他几个问题中，但它们并不完全相同和/或我无法使用/理解他们的答案来完全解决我的挑战。

我已经非常接近我的 custom-init.el 文件中的以下内容：

;; Windows layout setup
(add-to-list 'default-frame-alist '(fullscreen . maximized))
(split-window-right)
(setq initial-buffer-choice "~/emacs/Org/todo.org")
(setq org-agenda-window-setup 'current-window)
(add-hook 'after-init-hook (lambda () (org-agenda nil "u")))
(add-hook 'after-init-hook (lambda () (org-agenda-list 1)))

这将使用 window 位置和尺寸正确地格式化屏幕，并按照我想要的方式显示。 它还会打开我的待办事项文件并将其放在我想要的左侧，但是我在右侧打开了暂存缓冲区。 议程已正确创建和格式化，是缓冲区列表中的第三项（scratch、todo.org、议程，然后是我在启动时打开的所有其他 org 文件。）

如此接近，但经过几天的思考和尝试不同的事情，我就是没有到达那里。

Answer 1

添加一个钩子到window-setup-hook应该会得到预期的效果 - 考虑到您的框架自定义。

(add-to-list 'default-frame-alist '(fullscreen . maximized))
(setq initial-buffer-choice "~/emacs/org/todo.org")

(defun my-init-hook ()
  (split-window-right)
  (let ((org-agenda-window-setup 'other-window))
    (org-agenda nil "a")))

(add-hook 'window-setup-hook #'my-init-hook)