[gnus git] branch master updated: n0-15-94-g2de30b1 =1= To provide <s> support.

       via  2de30b119e00ceb16dd3108303624bca837e60ac (commit)
      from  5bea28e91492789ba58df1f7d083f0d05d3d4ee9 (commit)


- Log -----------------------------------------------------------------
commit 2de30b119e00ceb16dd3108303624bca837e60ac
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Fri Apr 29 15:29:24 2011 +0200

    To provide <s> support.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e37fae3..8592577 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-04-29  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* shr.el (shr-strike-through): New face.
+	(shr-tag-s): Use it to provide <s> support.
+
 2011-04-25  Teodor Zlatanov  <[email protected]>
 
 	* gnus-registry.el (gnus-registry-ignore-group-p): Don't call
diff --git a/lisp/shr.el b/lisp/shr.el
index 1f6cb52..8dd228a 100644
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -87,6 +87,10 @@ used."
 This is used for cid: URLs, and the function is called with the
 cid: URL as the argument.")
 
+(defface shr-strike-through '((t (:strike-through t)))
+  "Font for <s> elements."
+  :group 'shr)
+
 ;;; Internal variables.
 
 (defvar shr-folding-mode nil)
@@ -760,6 +764,9 @@ ones, in case fg and bg are nil."
   (shr-generic cont)
   (shr-ensure-newline))
 
+(defun shr-tag-s (cont)
+  (shr-fontize-cont cont 'shr-strike-through))
+
 (defun shr-tag-b (cont)
   (shr-fontize-cont cont 'bold))
 

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog |    5 +++++
 lisp/shr.el    |    7 +++++++
 2 files changed, 12 insertions(+), 0 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project