+ ;; Flush the group format spec cache if there's the grouplens stuff.
+ (let ((spec (assq 'group gnus-format-specs)))
+ (when (and (memq 'group types)
+ (string-match " gnus-tmp-grouplens[ )]"
+ (gnus-prin1-to-string (cdr spec))))
+ (setq gnus-format-specs (delq spec gnus-format-specs)
+ spec (assq 'group gnus-format-specs-compiled)
+ gnus-format-specs-compiled (delq spec gnus-format-specs-compiled))))