mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Refactor into narf-init
This commit is contained in:
@ -128,5 +128,12 @@
|
|||||||
"Prevent annoying \"Active processes exist\" query when you quit Emacs."
|
"Prevent annoying \"Active processes exist\" query when you quit Emacs."
|
||||||
(flet ((process-list ())) ad-do-it)))
|
(flet ((process-list ())) ad-do-it)))
|
||||||
|
|
||||||
|
(defun narf-init ()
|
||||||
|
(defun display-startup-echo-area-message ()
|
||||||
|
(message ">>> Loaded in %s" (emacs-init-time)))
|
||||||
|
(require 'server)
|
||||||
|
(unless (server-running-p)
|
||||||
|
(server-start)))
|
||||||
|
|
||||||
(provide 'core)
|
(provide 'core)
|
||||||
;;; core.el ends here
|
;;; core.el ends here
|
||||||
|
9
init.el
9
init.el
@ -99,13 +99,8 @@
|
|||||||
|
|
||||||
my-bindings
|
my-bindings
|
||||||
my-commands
|
my-commands
|
||||||
)))
|
))
|
||||||
|
|
||||||
(defun display-startup-echo-area-message ()
|
(narf-init))
|
||||||
(message ">>> Loaded in %s" (emacs-init-time)))
|
|
||||||
|
|
||||||
(require 'server)
|
|
||||||
(unless (server-running-p)
|
|
||||||
(server-start))
|
|
||||||
|
|
||||||
;;; I think so Brain...
|
;;; I think so Brain...
|
||||||
|
Reference in New Issue
Block a user