On Mon, 28 Jul 2008 16:54:19 +0200, [EMAIL PROTECTED] (Johan Bockgård) wrote: > 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)
Thank you! :) _______________________________________________ info-gnus-english mailing list [email protected] http://lists.gnu.org/mailman/listinfo/info-gnus-english
