在 Emacs 中的双引号之间更改纯文本的外观

Posted 2023-03-15

【中文标题】在 Emacs 中的双引号之间更改纯文本的外观

【英文标题】：Change face of plain text between double quotation marks in Emacs

【发布时间】：2011-11-01 14:26:41

【问题描述】：

我正在寻找一种方法来突出显示或使用纯文本中引用文本的不同面。似乎应该有一个复杂/增强的文本模式，但我找不到它。

如果没有简单的解决方案，您能告诉我应该从哪里开始编写函数吗？

非常感谢！

从 19.xx 开始使用 Emacs 的菜鸟

【问题讨论】：

您能否更具体地说明引用的意思？你的意思是“在两个”符号之间？还是“块引用：空格缩进”？还是别的什么？

标题更清楚了，@Rupert Swarbrick。

【参考方案1】：

我不确定是否有一个主模式已经这样做了，但你可以使用 define-derived-mode 轻松地制作一个

(define-derived-mode rich-text-mode text-mode "Rich Text"
  "text mode with string highlighting."

  ;;register keywords
  (setq rich-text-font-lock-keywords
        '(("\"\\(\\(?:.\\|\n\\)*?[^\\]\\)\"" 0 font-lock-string-face)))
  (setq font-lock-defaults rich-text-font-lock-keywords)
  (font-lock-mode 1))

或者，您可以在文本模式中添加一个钩子：

(defun add-quotes-to-font-lock-keywords ()
  (font-lock-add-keywords nil '(("\"\\(\\(?:.\\|\n\\)*?[^\\]\\)\"" 0 font-lock-string-face))))

(add-hook 'text-mode-hook 'add-quotes-to-font-lock-keywords)

一般来说，编辑任何文本的好模式是 org-mode。不过，默认情况下它不会对字符串进行字体锁定。

【参考方案2】：

对于正则表达式，我认为您想在字符串内容中排除 " 本身，除非转义。像这样的东西 --- "，后跟非 " 或转义字符，后跟 "：

\"\\([^\"]\\|\\\\\\(.\\|[\n]\\)\\)*\"

但请注意，匹配引号“...”是臭名昭著的。我在Info+ 中就是这样做的，但是在一些信息节点中，这种突出显示会被偶尔单独的\" 或?\" 在引用此类编程结构的手册中抛出。