Emacs：字体锁定字体区域和多行

Question

我正在为 php/html 文件编写一个次要模式。我使用一个函数（参见 font-lock-keywords）来字体化 ?> 块。

为了对多行块进行字体化，我需要将 font-lock-multiline 设置为 t。

一切都运行得很好。在这种情况下，他们只是一个问题： 当我有一个多行块并删除结束标记 (?>) 时，该块是未字体化的。当我把标签放回去时，该块不会再次被字体化。

我有三个问题：

是否有一个简单的解决方案来解决这个问题

1/如果没有， 2/每次我输入这两个字符时，有什么方法可以触发 font-lock-fontify-buffer ： '?''>'

3/更好的是，有没有办法触发这种功能：当我输入 ?> 时，我找到开始标签 并强制使用 此块上的 font-lock-fontify-region 。

Answer 1

这是一种基本方法，逻辑不够充分，但它演示了一个选项：

(defvar foo-minor-mode-map (make-keymap) "foo-minor-mode keymap.")
(define-key foo-minor-mode-map (kbd ">") 'foo-electric-gt)

(defun foo-electric-gt (&optional arg)
  (interactive "*p")
  (when (looking-back "\\?$")
    (save-excursion
      (let ((end (- (point) 1))
            (beg (+ (search-backward "<?php") 5)))
        (font-lock-fontify-region beg end))))
  (insert-char ?> arg))

(define-minor-mode foo-minor-mode
  "foo mode.

\\{foo-minor-mode-map}"
  :keymap 'foo-minor-mode-map)