Fix org-fontify-quote-and-verse-blocks when org-src-fontify-natively is t

* lisp/org.el (org-fontify-meta-lines-and-blocks-1): Do not attempt
native fontification in quote and verse blocks when
`org-src-fontify-natively' is non-nil.  Limit native fontification to
src and example blocks only.

Reported-by: William Denton <william@williamdenton.org>
Link: https://orgmode.org/list/Ml33lIeToTUsXIzeVEIolD5SsK-HJ0yrdPgOMr2N9WrldhU72LtjnGjehgViKAjMOgN5IAwM5Tx5TfCJlRBrTfnGnxqpuhy3-lEbUNycPMY=@williamdenton.org
This commit is contained in:
Ihor Radchenko 2024-03-19 22:22:57 +03:00
parent 4f548f9482
commit df4a48bc4f
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 1 additions and 2 deletions

View File

@ -5533,8 +5533,7 @@ by a #."
;; blocks with undocumented language specifier.
;; Keep this undocumented feature for user
;; convenience.
t
;; (string= block-type "src")
(member block-type ("src" "example"))
)
(save-match-data
(org-src-font-lock-fontify-block (or lang "") block-start block-end))