Move Wanderlust configuration from :config to :init

For some reason WL doesn’t pick up these values if set from :config
This commit is contained in:
Gergely Polonkai 2018-10-31 16:22:53 +01:00
parent c399805709
commit 203bb554c5

View File

@ -2105,6 +2105,10 @@ This will be replaced with something self-hosted, eventually.
:no-require t :no-require t
:init :init
(require 'wl) (require 'wl)
(setq elmo-maildir-folder-path (expand-file-name "mail" (or (getenv "XDG_CACHE_HOME") "~/.cache"))
wl-folders-file (expand-file-name
(convert-standard-filename "wl-folders")
user-emacs-directory))
:config :config
(when (boundp 'mail-user-agent) (when (boundp 'mail-user-agent)
(setq mail-user-agent 'wl-user-agent)) (setq mail-user-agent 'wl-user-agent))
@ -2115,11 +2119,6 @@ This will be replaced with something self-hosted, eventually.
'wl-draft-send 'wl-draft-send
'wl-draft-kill 'wl-draft-kill
'mail-send-hook)) 'mail-send-hook))
(setq
elmo-maildir-folder-path (expand-file-name "mail" (or (getenv "XDG_CACHE_HOME") "~/.cache"))
wl-folders-file (expand-file-name
(convert-standard-filename "wl-folders")
user-emacs-directory))
:bind :bind
(:map gpolonkai/pers-map (:map gpolonkai/pers-map
("m" . wl))) ("m" . wl)))