Only start server when it's not already running

This commit is contained in:
larstvei 2025-08-25 07:33:10 +02:00
parent 9fb33b3c7f
commit d19a91f485

View File

@ -168,12 +168,14 @@
(add-hook (add-hook
'after-init-hook 'after-init-hook
(lambda () (lambda ()
(require 'server)
(let ((private-file (concat user-emacs-directory "private.el"))) (let ((private-file (concat user-emacs-directory "private.el")))
(when (file-exists-p private-file) (when (file-exists-p private-file)
(load-file private-file)) (load-file private-file))
(when (file-exists-p custom-file) (when (file-exists-p custom-file)
(load-file custom-file)) (load-file custom-file))
(server-start)))) (unless (server-running-p)
(server-start)))))
#+end_src #+end_src