Emacs字体锁定关键字中的单词边界

Question

如果在暂存缓冲区中粘贴和评估以下代码，则无法突出显示 23-23 中的 23，但如果在文本缓冲区中完成则不会。

;; Example 1


'(1234 23 23-23 end)

(progn
  (font-lock-add-keywords nil
                          `(("\\b23\\b"
                             (0 'success))
                            "end"))
  (font-lock-fontify-buffer))

为什么当M-x isearch-forward-regexp RET \b23\b 仍然匹配23-23 中的23 时它会失败？

即使我更改为以下代码，也只有23-23 中的第一个23 会突出显示。

;;; Example 2

'(1234 23 23-23 end)

(progn
  (font-lock-add-keywords nil
                          `((,(rx (or word-boundary
                                      "-")
                                  (group "23")
                                  (or word-boundary
                                      "-"))
                             (1 'success))
                            "end"))
  (font-lock-fontify-buffer))

旁注：“结束”在那里，以便我可以检测 23 的荧光笔是否形成不良。如果格式不正确或无提示地发出错误信号，则 end 不会突出显示。

---

;;; Example 3 (with xy instead of 23. also passing t and 'append.)
;;; if evaluated in the scratch buffer, it doesn't highlight xy in xy-xy

'(wxyz xy xy-xy end)

(progn
  (font-lock-add-keywords nil
                          `(("\\bxy\\b"
                             (0 'success t))
                            "end")
                          'append)
  (font-lock-fontify-buffer))

Answer 1

它不在缓冲区*scratch* 中的事实表明这是当前模式的问题。主要有两种可能：

• @wvcvw 建议：检查字符2 和3 的语法类是什么。

• 已经为模式定义的 font-lock-keywords 与您的代码交互——例如，它们会覆盖它。尝试将'APPEND 作为第三个参数添加到font-lock-add-keywords。尝试将t 作为HIGHLIGHT 表达式添加到您的荧光笔性别（请参阅文档）。这应该让您的突出显示覆盖任何可能已经存在的内容。

顺便说一句，您说它在“文本缓冲区”中不起作用，但这是什么意思？从emacs -Q 开始，在text-mode 的缓冲区中评估您的代码表明它确实 有效。调查您的“文本缓冲区”模式是什么，并尝试上面的建议（必要时两个项目符号，但先尝试第二个）。