shr.el (shr-tag-del): Add support for del tag.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 8dad14c44ae809e2956d7d2dd047b6417d06e241..57acf0ced0e70bd516d9faf9ba79425723c5f785 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2011-05-16  Julien Danjou  <julien@danjou.info>
+
+       * shr.el (shr-tag-del): Add support for del tag.
+
 2011-05-13  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-html.el (gnus-html-put-image): Register a displayer.

diff --git a/lisp/gnus/shr.el b/lisp/gnus/shr.el
index edd106618dfb6ecd20eaf0180881702b2bf39a7a..d23d9c7724b726156f95ed7beae5a232f1888380 100644 (file)
--- a/lisp/gnus/shr.el
+++ b/lisp/gnus/shr.el
@@ -780,6 +780,9 @@ ones, in case fg and bg are nil."
 (defun shr-tag-s (cont)
   (shr-fontize-cont cont 'shr-strike-through))
 
+(defun shr-tag-del (cont)
+  (shr-fontize-cont cont 'shr-strike-through))
+
 (defun shr-tag-b (cont)
   (shr-fontize-cont cont 'bold))