如何以编程方式调用 Edwin 中的 M-x 函数用于 MIT 方案?



我正在使用带有 MIT 方案的 Edwin 编辑器,因为默认字体太小,所以我做了M-x set-font然后选择

-adobe-courier-bold-r-normal--24-240-75-75-m-150-iso8859-1

以放大字体。这工作正常,但是当我尝试将

(set-font "-adobe-courier-bold-r-normal--24-240-75-75-m-150-iso8859-1")

在我的~/.edwin,它抱怨Unbound variable: set-font

在 emacs 中,来自M-x的交互函数通常可以在 Elisp 中以编程方式直接调用,但显然不是这样。我尝试通过查看带有"info mit-scheme-user"的手册来阅读更多关于如何自定义 Edwin 的信息,但 Edwin 章节特别说

本手册不讨论 Edwin 的定制。

如何以编程方式调用set-font

显然,Edwin 命令不是过程,不能在 Scheme 代码中直接调用。但是,一个简单的修复可以实现这一点,只需使用ref-command宏包装它:

`((ref-command set-font) "-adobe-courier-bold-r-normal--24-240-75-75-m-150-iso8859-1")`

来源:1997年的邮件列表线程具有完全相同的问题

Edwin 命令不是过程(与 GNU Emacs 不同(。埃德温命令 是一个具有不寻常名称的特殊对象。如果要调用 命令 从程序 您必须使用 REF-COMMAND 宏。为 例如,要像键入"M-x 外壳"一样启动外壳缓冲区:((ref-command shell) #t)

最新更新