[elpa] externals/org df4a48bc4f: Fix org-fontify-quote-and-verse-blocks when org-src-fontify-natively is t

[ELPA Syncer]

branch: externals/org
commit df4a48bc4fca4651f35d2f955a9bbc74d4e1883e
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    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
---
 lisp/org.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index fada1fb599..e98c943ece 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -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))