From 327b44e3a02492835a1c47f40b0b49b17c6582ef Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Wed, 2 Sep 2020 15:04:54 +0200 Subject: [PATCH] Emit message when server is not started --- init.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/init.el b/init.el index 0935332..ee4528b 100644 --- a/init.el +++ b/init.el @@ -281,9 +281,10 @@ ;; present, we really don't have to do anything. Furthermore, calling ;; `db/run-init' again in a running Emacs will not restart the server (but ;; then, why whould one want to do this?). - (unless (and (boundp 'server-process) server-process) - (require 'server) + (if (and (boundp 'server-process) server-process) + (message "Server already running, not restarting.") + (require 'server) (let ((server-file (expand-file-name server-name (if server-use-tcp server-auth-dir server-socket-dir)))) (if (file-exists-p server-file)