diff options
Diffstat (limited to 'lisp/init-mail.el')
| -rw-r--r-- | lisp/init-mail.el | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/lisp/init-mail.el b/lisp/init-mail.el index 0163420..eda2883 100644 --- a/lisp/init-mail.el +++ b/lisp/init-mail.el @@ -1,10 +1,15 @@ (require 'init-gnus) -(if (equal (daemonp) "mail") - (progn - (setq mode-line-misc-info (cons " [Mail] " mode-line-misc-info)) - (key-chord-define-global "jg" 'km/mail-map)) - (global-set-key (kbd "C-x m") nil)) +(let ((server (daemonp))) + (cond + ((string= server "default") + (global-set-key (kbd "C-x m") nil) + (setq save-abbrevs 'silently + bookmark-save-flag 1)) + ((string= server "mail") + (setq mode-line-misc-info (cons " [Mail] " mode-line-misc-info)) + (key-chord-define-global "jg" 'km/mail-map) + (setq save-abbrevs nil)))) (provide 'init-mail) |