Re: rcirc bug

[Stefan Monnier <monnier@iro.umontreal.ca>]

>   		   (dolist (type rcirc-activity-types)
>   		     (rcirc-add-face 0 (length s)
>   				     (case type
> ! 				       ('nick 'rcirc-track-nick)
> ! 				       ('keyword 'rcirc-track-keyword))
>   				     s)))
>   		 s))
>   	     buffers ","))

Indeed, this was wrong.  It was equivalent to:

		   (dolist (type rcirc-activity-types)
		     (rcirc-add-face 0 (length s)
				     (cond
                                      ((or (eq type 'nick)
                                           (eq type 'quote))
                                       'rcirc-track-nick)
                                      ((or (eq type 'keyword)
                                           (eq type 'quote))
				       'rcirc-track-keyword))
				     s)))
		 s))
	     buffers ","))


-- Stefan