Giorgos Keramidas <[EMAIL PROTECTED]> writes:
> (dolist (pair keramida-gnus-group-thread-function-map)
> (message "pair is %s" pair)
> (if (not match-function)
> (let ((pattern (car pair))
> (func (cdr pair)))
> (if (and (string-match pattern group)
> (fboundp func))
> (setq match-function func))))))
(assoc-default group keramida-gnus-group-thread-function-map
'string-match)
--
Johan Bockgård
_______________________________________________
info-gnus-english mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/info-gnus-english
