Re: diary font-lock issue

[martin rudalics]

> I'd suggest the following 100% untested:
> ...
> (defun foo-font-lock-fontify-region-function (beg end &optional loudly)
>   (goto-char beg)
>   (forward-line 0)
>   (if (looking-at "=+$") (setq beg (line-beginning-position 0)))
>   (goto-char end)
>   (unless (bolp) (forward-line 1))
>   (if (looking-at "=+$") (setq end (line-beginning-position 2)))
>   (font-lock-default-fontify-region beg end loudly))

100% untested, maybe.  100% elegant, for sure.  Would it be very
difficult to add this as an example to the "Other Font Lock Variables"
section of the Elisp manual?