在Emacs中打开具有预定义高度的edebug窗口

Question

如何在给定高度打开edebug窗口？我知道有一个window-resize函数。但是我不确定在edebug被激活之后是否有一个可以运行的钩子。

假设我使用文件"t.txt"打开Emacs，然后切换到*scratch*缓冲区并输入

(defun test ()
  (message "Hello"))

然后我使用 Cu CMx （它调用edebug-defun）来检测此函数，然后切换到t.txt缓冲区并输入 M- :( test）< / kbd>然后我得到以下屏幕截图：

因此，默认情况下，edebug窗口将当前窗口分成两个，一个在另一个之上，并在下方窗口中激活。

我想为此窗口设置预定义的高度..

Answer 1

这是一条建议：

(defadvice edebug-pop-to-buffer (after edebug-advice activate)
  "Resize window."
  (set-window-text-height (get-buffer-window buffer) 5))