Ignore all <style> tags for the moment.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7a30fca..c74c9a3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -5,6 +5,7 @@
        (shr-tag-font): Actually let the styles be inherited instead of
        overwriting them.
        (shr-tag-font): Get the background color right.
+       (shr-tag-style): Ignore all <style> tags for the moment.
 
        * gnus-int.el (gnus-request-thread): Rework to take a header instead of
        a Message-ID to avoid having nnimap depend on gnus-sum.

diff --git a/lisp/shr.el b/lisp/shr.el
index a41ebf1..fafe3d9 100644 (file)
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -638,6 +638,9 @@ ones, in case fg and bg are nil."
     (shr-generic cont)
     (shr-colorize-region start (point) fgcolor bgcolor)))
 
+(defun shr-tag-style (cont)
+  )
+
 (defun shr-tag-p (cont)
   (shr-ensure-paragraph)
   (shr-indent)