From 7c641944ce85db15fe69800f511fb3f262fb1b09 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Sun, 12 Apr 2015 00:41:16 -0400
Subject: Move server settings to init-server.el

---
 lisp/init-mail.el   | 15 ---------------
 lisp/init-server.el | 18 ++++++++++++++++++
 2 files changed, 18 insertions(+), 15 deletions(-)
 delete mode 100644 lisp/init-mail.el
 create mode 100644 lisp/init-server.el

(limited to 'lisp')

diff --git a/lisp/init-mail.el b/lisp/init-mail.el
deleted file mode 100644
index eda2883..0000000
--- a/lisp/init-mail.el
+++ /dev/null
@@ -1,15 +0,0 @@
-
-(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)
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)
-- 
cgit v1.2.3