Re: Treatment for gnus-article-wash-html?

[Pete Kazmier <pete@kazmier.com>]

[-- Attachment #1: Type: text/plain, Size: 632 bytes --]

Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
> Hm.  That's not supposed to happen...  I've done some minor tweaks
> to the HTML washing function, so could you try updating to the
> latest CVS and see whether the problem still exists?  If it does,
> I'll poke around some more...

The problem still exists, i.e. if I specify a string list as the value
of the treatment variable, it gets applied to all parts of the article
(including the headers).

After looking at the code (bear in mind that I'm a complete newbie), I
think I have corrected the problem. I was able to fix this behavior
with the following patch.

Thanks,
Pete


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Patch to fix treatment of headers --]
[-- Type: text/x-patch, Size: 664 bytes --]

Index: lisp/gnus-art.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-art.el,v
retrieving revision 6.264
diff -u -r6.264 gnus-art.el
--- lisp/gnus-art.el	2003/01/02 20:45:14	6.264
+++ lisp/gnus-art.el	2003/01/02 21:30:06
@@ -6253,6 +6253,8 @@
   (cond
    ((null val)
     nil)
+   (condition
+    (eq condition val))
    ((and (listp val)
 	 (stringp (car val)))
     (apply 'gnus-or (mapcar `(lambda (s)
@@ -6271,8 +6273,6 @@
 	(equal (car val) type))
        (t
 	(error "%S is not a valid predicate" pred)))))
-   (condition
-    (eq condition val))
    ((eq val t)
     t)
    ((eq val 'head)