setting group properties based on group name and regexp

setting group properties based on group name and regexp

[Dave Cohen]

Is it possible in my .gnus to set group properties based on the group
name?  I'm especially interested in maching the names against regular
expressions.  I'm familiar with setting group properties using 'G p',
but that requires manual setting each time I create a new group.

I'd like all groups matching "mail/out/*" (mail I've sent) to have a
different summary mode line, showing the mail recipient instead of the
sender.

I'd like all groups matching "mail/*" but NOT matching "mail/in/*"
(mail I've saved) to display all messages and disable expiration.

I'm not worried about getting the regexps to match correctly.  I'm
just wondering if anyone can show me some lisp that sets properties
based on regexps matching group name.  Something like
gnus-posting-styles, but for group properties, would be ideal.

Many thanks.  My apologies if this is a FAQ.

-Dave

Re: setting group properties based on group name and regexp

[Karl Kleinpaste]

Dave Cohen <dnc@bigfoot.com> writes:
> Is it possible in my .gnus to set group properties based on the group
> name?

This is (part of) what I use.

(setq gnus-select-group-hook
      (function
       (lambda ()
	 (cond ((string-match "clari." gnus-newsgroup-name)
		(setq gnus-summary-line-format "%U%R%z%I%(%[%4L: %-6,6n%]%)   %s\n"))
	       ((string-match "comp.sources" gnus-newsgroup-name)
		(setq gnus-summary-line-format "%U%R%z%I%(%[%4L%]%)   %s\n"))
	       ((string-match "nnir:\\|nnml:[alpu]" gnus-newsgroup-name)
		(setq gnus-summary-line-format "%U%R%z %d %I%(%[%4L: %-20,20f%]%) %s\n"))
	       (t
		(setq gnus-summary-line-format "%U%R%z%I%(%[%4L: %-20,20f%]%) %s\n")))
	 (setq gnus-summary-mode-line-format
	       (if (string-match "nnir:" gnus-newsgroup-name)
		   "Gnus: %G [%A] %Z" "Gnus: %g [%A] %Z"))
	 )))

--karl