 (defun pjones:wl-set-folder-variables-for (name)
   "Set all folder variables for Wanderlust folder with NAME."
   (pcase name
-    ((pred (string-match-p "pmade\\.com"))
+    ((pred (string-match-p "devalot\\.com"))
      (mapc #'pjones:wl-set-folder-variables pjones:wl-devalot-folder-names))))
 
 (defun pjones:wl-insert-signature (file)


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


(custom-set-variables
 '(wl-from "Peter J. Jones <pjones@devalot.com>")
 '(wl-local-domain "devalot.com")
 '(elmo-imap4-default-server "imap.fastmail.com")
 '(elmo-imap4-default-stream-type 'ssl)
 '(elmo-imap4-default-authenticate-type 'login)
 '(elmo-passwd-storage-type 'auth-source)
