emacs - 显式设置 Emacs 窗口的大小

Question

我如何(或尝试)将 Emacs 窗口的窗口大小(而不是框架大小)设置为特定值？我知道 Emacs 适合内容的功能，但没有一个功能允许我设置精确的高度。我知道这样一个事实，只有当我正在调整的维度上存在其他窗口时，我才能这样做。我需要它来自动调整我的编译缓冲区中的高度(当然要达到某个阈值，比如 frame-height() 的 2/3)以适应编译器/解释器输出的消息行数。

到目前为止我有

  (balance-windows (get-buffer-window compilation-buffer))
  (fit-window-to-buffer (get-buffer-window compilation-buffer)
                        (/ (frame-height) 2))

但是由于某种原因，当编译窗口很小时，第一条语句不起作用。那就是当编译窗口太大时代码可以正常工作，但在它太小时时却不能正常工作。

Answer 1

获取要更改的窗口的当前高度。

从当前高度计算所需的变化:增量。

将增量传递给 enlarge-window .

例如，

(let* ((curr-ht  (window-height window))
       (delta    (- DESIRED-HEIGHT curr-ht)))
  (save-excursion
    (save-selected-window (select-window window)
                          (enlarge-window delta))))