From 39da95408c86f648946574329510b1481085f539 Mon Sep 17 00:00:00 2001
From: Bozhidar Batsov <bozhidar@batsov.com>
Date: Sun, 18 Oct 2020 13:26:05 +0300
Subject: [PATCH] Prefix init messages coming from Prelude so they are easier
 to spot

---
 init.el | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/init.el b/init.el
index 5f2a493..46a7c26 100644
--- a/init.el
+++ b/init.el
@@ -43,10 +43,10 @@
   (getenv
    (if (equal system-type 'windows-nt) "USERNAME" "USER")))
 
-(message "Prelude is powering up... Be patient, Master %s!" prelude-user)
+(message "[Prelude] Prelude is powering up... Be patient, Master %s!" prelude-user)
 
 (when (version< emacs-version "25.1")
-  (error "Prelude requires GNU Emacs 25.1 or newer, but you're running %s" emacs-version))
+  (error "[Prelude] Prelude requires GNU Emacs 25.1 or newer, but you're running %s" emacs-version))
 
 ;; Always load newest byte code
 (setq load-prefer-newer t)
@@ -100,10 +100,10 @@ by Prelude.")
 
 ;; preload the personal settings from `prelude-personal-preload-dir'
 (when (file-exists-p prelude-personal-preload-dir)
-  (message "Loading personal configuration files in %s..." prelude-personal-preload-dir)
+  (message "[Prelude] Loading personal configuration files in %s..." prelude-personal-preload-dir)
   (mapc 'load (directory-files prelude-personal-preload-dir 't "^[^#\.].*el$")))
 
-(message "Loading Prelude's core...")
+(message "[Prelude] Loading Prelude's core modules...")
 
 ;; load the core stuff
 (require 'prelude-packages)
@@ -130,14 +130,14 @@ by Prelude.")
 (when (eq system-type 'windows-nt)
   (require 'prelude-windows))
 
-(message "Loading Prelude's modules...")
+(message "[Prelude] Loading Prelude's additional modules...")
 
 ;; the modules
 (if (file-exists-p prelude-modules-file)
     (load prelude-modules-file)
-  (message "Missing personal modules file %s" prelude-modules-file)
-  (message "Falling back to the bundled example file sample/prelude-modules.el")
-  (message "You should copy this file to your personal configuration folder and tweak it to your liking")
+  (message "[Prelude] Missing personal modules file %s" prelude-modules-file)
+  (message "[Prelude] Falling back to the bundled example file sample/prelude-modules.el")
+  (message "[Prelude] You should copy this file to your personal configuration folder and tweak it to your liking")
   (load (expand-file-name "sample/prelude-modules.el" user-emacs-directory)))
 
 ;; config changes made through the customize UI will be stored here
@@ -145,12 +145,12 @@ by Prelude.")
 
 ;; load the personal settings (this includes `custom-file')
 (when (file-exists-p prelude-personal-dir)
-  (message "Loading personal configuration files in %s..." prelude-personal-dir)
+  (message "[Prelude] Loading personal configuration files in %s..." prelude-personal-dir)
   (mapc 'load (delete
                prelude-modules-file
                (directory-files prelude-personal-dir 't "^[^#\.].*\\.el$"))))
 
-(message "Prelude is ready to do thy bidding, Master %s!" prelude-user)
+(message "[Prelude] Prelude is ready to do thy bidding, Master %s!" prelude-user)
 
 ;; Patch security vulnerability in Emacs versions older than 25.3
 (when (version< emacs-version "25.3")