Hello, Anders Johansson <mejlaande...@gmail.com> writes:
> I want to fontify quote blocks (i use them a lot for note taking and > writing paper) so that they stand out (and so I enable > org-fontify-quote-and-verse-blocks) but it would be useful to preserve > the local fontification of emphasis, links etc. inside quote blocks. > This can easily be achieved with a patch like this org.el: > > 6096,6099c6096,6099 > < ((string= block-type "quote") > < (add-face-text-property beg1 (min (point-max) (1+ end1)) > 'org-quote t)) > < ((string= block-type "verse") > < (add-face-text-property beg1 (min (point-max) (1+ end1)) > 'org-verse t))) > --- >> ((string= block-type "quote") >> (add-text-properties beg1 (min (point-max) (1+ end1)) >> '(face org-quote))) >> ((string= block-type "verse") >> (add-text-properties beg1 (min (point-max) (1+ end1)) >> '(face org-verse)))) > > > In this invocation add-face-text-property appends org-quote to the > face property, and hence all other fontification is kept. > > Does this interfere with something else or what people would expect? > In my view it looks much better, but I guess that can depend on the > appearance of org-quote and org-verse (I have them as > font-lock-comment-face, just a slightly different colour, on top of > which italics etc. look good). Sounds good. Could you provide a patch using git format-patch command? Please add TINYCHANGE at the end of the commit message if you haven't signed FSF copyright papers. Thank you. Regards, -- Nicolas Goaziou