From 929a34944a663842e3fb8e19c2a84965e5edb6a7 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 29 Jan 2016 07:09:53 -0500 Subject: [PATCH] Move server/startup-message/auto-kill-processes init to core.el --- core/core.el | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/core/core.el b/core/core.el index 3ecc78878..a5755377c 100644 --- a/core/core.el +++ b/core/core.el @@ -142,5 +142,19 @@ (IS-LINUX 'core-os-linux) (IS-WINDOWS 'core-os-win32))) +;; Set this up at the end to allow errors to prevent it. +(add-hook! after-init + (defadvice save-buffers-kill-emacs (around no-query-kill-emacs activate) + "Prevent annoying \"Active processes exist\" query when you quit Emacs." + (cl-flet ((process-list ())) ad-do-it))) + +(defun display-startup-echo-area-message () + (after! workgroups2 + (message "%sLoaded in %s" (narf/tab-display t t) (emacs-init-time)))) + +(require 'server) +(unless (server-running-p) + (server-start)) + (provide 'core) ;;; core.el ends here