Re: [O] [PATCH 1/1] org.el: Make faces org-quote and org-verse be appended

[Nicolas Goaziou]

Hello,

Anders Johansson  writes:

> This means fontification of emphasis, links etc. is kept in quote and
> verse blocks even with org-fontify-quote-and-verse-blocks non-nil.

Applied. Thank you.

Regards,

-- 
Nicolas Goaziou

[O] [PATCH 1/1] org.el: Make faces org-quote and org-verse be appended

[Anders Johansson]

This means fontification of emphasis, links etc. is kept in quote 
and

verse blocks even with org-fontify-quote-and-verse-blocks non-nil.

TINYCHANGE
---
lisp/org.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index 3290a2b..282c078 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -5934,9 +5934,9 @@ by a #."
			 '(org-block))) ; end of source 
block

 ((not org-fontify-quote-and-verse-blocks))
 ((string= block-type "quote")
-	  (add-text-properties beg1 (min (point-max) (1+ end1)) 
  '(face org-quote)))
+	  (add-face-text-property beg1 (min (point-max) (1+ end1)) 
'org-quote t))

 ((string= block-type "verse")
-	  (add-text-properties beg1 (min (point-max) (1+ end1)) 
  '(face org-verse
+	  (add-face-text-property beg1 (min (point-max) (1+ end1)) 
'org-verse t)))
	(add-text-properties beg beg1 '(face 
org-block-begin-line))
	(add-text-properties (min (point-max) (1+ end)) (min 
(point-max) (1+ end1))

 '(face org-block-end-line))
--
2.11.1