changeset 111862:6476ce7872ae

shr.el (shr-tag-label): Add <label> support.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Thu, 09 Dec 2010 23:20:33 +0000
parents 869f03cdb254
children 723b6f993cd3
files lisp/gnus/ChangeLog lisp/gnus/shr.el
diffstat 2 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Thu Dec 09 21:07:53 2010 +0200
+++ b/lisp/gnus/ChangeLog	Thu Dec 09 23:20:33 2010 +0000
@@ -1,6 +1,7 @@
 2010-12-09  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 	* shr.el (shr-tag-script): Ignore <script>.
+	(shr-tag-label): Add <label> support.
 
 2010-12-09  Katsumi Yamaoka  <yamaoka@jpl.org>
 
--- a/lisp/gnus/shr.el	Thu Dec 09 21:07:53 2010 +0200
+++ b/lisp/gnus/shr.el	Thu Dec 09 23:20:33 2010 +0000
@@ -644,6 +644,10 @@
 (defun shr-tag-script (cont)
   )
 
+(defun shr-tag-label (cont)
+  (shr-generic cont)
+  (shr-ensure-paragraph))
+
 (defun shr-tag-p (cont)
   (shr-ensure-paragraph)
   (shr-indent)