The BBDB can be used to store specific fields which tell Gnus which accounts to
use when posting to the recipient in the BBDB.
(defun DE-bbdb-match-field-recipient (field regexp)
"Match FIELD for recipient against REGEXP.
FIELD must be a symbol, e.g. 'email-type."
(let (who rec)
(or (message-fetch-field "reply-to")
(cadr (gnus-extract-address-components who)))))
(string-match regexp (bbdb-get-field rec field)))))
;; by adding a bdbb field called "email-type" and setting it to "friend-alias"
;; this gnus-posting-style is met when replying to people. If posting from a group
;; with "friends" in the name ditto.
(add-to-list `gnus-posting-styles `((or (string-match ,(rx "friends") gnus-newsgroup-name) (DE-bbdb-match-field-recipient 'email-type "friend-alias"))
(eval (setq mml2015-signers nil))
(signature-file "~/.emacs.d/.sigs/friends.sig")) t )