diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2015-04-12 00:41:16 -0400 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2015-04-12 00:41:16 -0400 |
| commit | 7c641944ce85db15fe69800f511fb3f262fb1b09 (patch) | |
| tree | 86fe01d574fec655f43a54030478719417f4800a /lisp/init-server.el | |
| parent | d8591501835d076928ec9a906f20556e749a782c (diff) | |
| download | emacs.d-7c641944ce85db15fe69800f511fb3f262fb1b09.tar.gz | |
Move server settings to init-server.el
Diffstat (limited to 'lisp/init-server.el')
| -rw-r--r-- | lisp/init-server.el | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lisp/init-server.el b/lisp/init-server.el new file mode 100644 index 0000000..939617f --- /dev/null +++ b/lisp/init-server.el @@ -0,0 +1,18 @@ + +(setq server-use-tcp t) +(require 'server) +(unless (server-running-p) + (server-start)) + +(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-server) |