branch: elpa/htmlize
commit 9e4c0bcbf3f5d22508fbf61c80e646fc29b10943
Author: Hrvoje Niksic <[email protected]>
Commit: Hrvoje Niksic <[email protected]>
Faces that come first take precedence over those that come later.
---
htmlize.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/htmlize.el b/htmlize.el
index 9ec00a5..81b7e41 100644
--- a/htmlize.el
+++ b/htmlize.el
@@ -1354,7 +1354,9 @@ property and by buffer overlays that specify `face'."
(let (all-faces)
;; Faces from text properties.
(let ((face-prop (get-text-property (point) 'face)))
- (setq all-faces (htmlize-decode-face-prop face-prop)))
+ ;; we need to reverse the `face' prop because we want
+ ;; more specific faces to come later
+ (setq all-faces (nreverse (htmlize-decode-face-prop face-prop))))
;; Faces from overlays.
(let ((overlays
;; Collect overlays at point that specify `face'.