From dd0ec0f3e8aa0ce1c36d1b005fafa70fc158d22e Mon Sep 17 00:00:00 2001 From: Jim Myhrberg Date: Mon, 21 Aug 2017 13:24:04 +0100 Subject: [PATCH] Add startup time message --- core/siren-init.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/core/siren-init.el b/core/siren-init.el index 253bfa1..ba66167 100644 --- a/core/siren-init.el +++ b/core/siren-init.el @@ -6,6 +6,12 @@ ;;; Code: +;; Display the total loading time in the minibuffer + +(defun display-startup-echo-area-message () + "Display startup echo area message." + (message "Siren initialized in %s" (emacs-init-time))) + (message "Siren is powering up... Be patient, Master %s!" (getenv (if (equal system-type 'windows-nt) "USERNAME" "USER")))