| Paste number 19953: | conditional group activation based on domain |
| Pasted by: | anaran |
| When: | 5 years, 8 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+FE9 |
| Channel: | #xemacs |
| Paste contents: |
(cond
((string-match "at.work.com" domain)
(setq gnus-activate-level 3)
(setq gnus-activate-foreign-newsgroups 3)
(setq gnus-group-default-list-level 3)
(setq pop3-delete-retrieved-mail nil))
(t
(setq gnus-activate-level 4)
(setq gnus-activate-foreign-newsgroups 4)
(setq gnus-group-default-list-level 4)
;; too early when XEmacs initializes!
;; (gnus-server-open-all-servers)
(setq pop3-delete-retrieved-mail t)))This paste has no annotations.