emacs lisp，如何获取缓冲区主要模式？

Question

我尝试搜索谷歌并查看手册，但仍然找不到如何获取缓冲区对象的主要模式。你能帮我举个例子或参考吗？感谢

我能找到的唯一解决方案是在更改缓冲区然后更改回原始缓冲区后查询主要模式。有更好的方法吗？

Answer 1

这有问题吗？

(defun buffer-mode (buffer-or-string)
  "Returns the major mode associated with a buffer."
  (with-current-buffer buffer-or-string
     major-mode))

with-current-buffer 将在返回时恢复您的缓冲区。

Answer 2

对于当前缓冲区：

(message "%s" major-mode)

Answer 3

一个简单的方法是使用 buffer-local-value 函数，因为major-mode 是一个缓冲区局部变量：

(buffer-local-value 'major-mode (get-buffer "*scratch*"))

Answer 4

只是从以前的答案扩展 - 不带参数调用来获取当前缓冲区的模式：

(defun buffer-mode (&optional buffer-or-name)
  "Returns the major mode associated with a buffer.
If buffer-or-name is nil return current buffer's mode."
  (buffer-local-value 'major-mode
   (if buffer-or-name (get-buffer buffer-or-name) (current-buffer))))

例如在 *scratch* 缓冲区中：

(buffer-mode) => 'lisp-interaction-mode

(buffer-mode "tasks.org") => 'org-mode

Answer 5

好吧，describe-mode 采用一个可选的缓冲区参数，但它显示了帮助...而且我不太确定它返回什么...

但这是我在简短搜索中可以找到的最好的...抱歉...

Answer 6

简单评价一下：

(print major-mode)

Answer 7

另一种方法是，除了直接读取 major-mode 变量之外，还可以直接读取 mode-name 变量。