summaryrefslogtreecommitdiff
path: root/lisp/init-mail.el
blob: eda288392982de56db72bba31e98727971d18045 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

(require 'init-gnus)

(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)