                        ("X-Jabber-ID" ,db/jabber-id))))
                  value))))
 
-;; XXX: This needs some functionality for local accounts
 (defcustom db/mail-accounts nil
   "Configuration for email accounts.
 This is a list of lists, where each such list specifies necessary

  "Set SYMBOL to VALUE, as needed for `db/mail-accounts’."
  (cl-assert (eq symbol 'db/mail-accounts)
             "Only use `db/mail-accounts--set-value’ only for setting `db/mail-accounts’.")
  (set-default symbol value)

  ;; Set `gnus-secondary-select-methods’

                ;; if nothing works, sign with default method
                (mml-secure-message (cl-first methods) 'sign)))))))))


;; SMTP related functions

(defun db/set-smtp-server-from-header (orig-fun &rest args)
  "Choose smtp-settings dynamically, based on the From: header
