     ;; Username/host separator:
     "@"
     ;; Domains:
-    (or "devalot.com" "pmade.com")))
+    (or "devalot.com" "pmade.com" "effectiveruby.com")))
 
  '(wl-address-file (expand-file-name "~/notes/contacts/wanderlust.txt"))
  '(elmo-msgdb-directory (concat user-emacs-directory "elmo/"))

 '(signature-delete-blank-lines-at-eof t)

 '(wl-draft-config-alist
   '(((string-match "pmade\\.com" wl-draft-parent-folder)
      ("From" . (pjones:wl-generate-from-addr))
      (wl-smtp-posting-server . "mail.pmade.com")
      (wl-smtp-posting-user . (pjones:wl-get-user wl-smtp-posting-server))
      (wl-smtp-posting-port . 465)
      (wl-smtp-authenticate-type . "plain")


(defun pjones:wl-devalot-folders-init ()
  "Update `pjones:wl-devalot-folder-names' with Wanderlust entities."
  (let* ((elmo-imap4-default-server "imap.fastmail.com")
         (elmo-imap4-default-user (pjones:wl-get-user elmo-imap4-default-server)))
    (setq pjones:wl-devalot-folder-names
          (mapcar
