Как обеспечить выполнение функции в определенном буфере?

Question

У меня есть функция, которая примерно говорит:

1. Open buffer X.
2. Enable minor mode Y.
3. Evaluate function Z.
4. Kill other windows except buffer X.

Однако она выполняет только первый шаг. Я предполагаю, что это потому, что остальные каким-то образом отбрасываются после открытия нового буфера. Как изменить его, чтобы он выполнял следующие действия:

1. Open buffer X.
2. Enable minor mode Y in X.
3. Evaluate function Z in X.
4. Kill other windows except X.

В качестве конкретного примера мой код

(defun my/day-page ()
  (interactive)
  (org-agenda-list nil "TODAY" 1 nil)         ; good
  (org-agenda-clockreport-mode)               ; no effect
  (org-agenda-columns)                        ; no effect
  (delete-other-windows)                      ; no effect
)

Оценка my/day-page дает мне org-agenda. Однако ни clockreport-mode, ни column-mode не представлены. Другой windows тоже не удалил ..