From eac0873501edb21b5bab77294e2e8c49a796f6ff Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Wed, 16 Sep 2020 08:44:38 +0300 Subject: [PATCH] Tweak a bit init.el --- init.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/init.el b/init.el index 17fd5ca..58d476f 100644 --- a/init.el +++ b/init.el @@ -39,11 +39,11 @@ ;; You may delete these explanatory comments. ;(package-initialize) -(defvar current-user +(defvar prelude-user (getenv (if (equal system-type 'windows-nt) "USERNAME" "USER"))) -(message "Prelude is powering up... Be patient, Master %s!" current-user) +(message "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)) @@ -51,6 +51,7 @@ ;; Always load newest byte code (setq load-prefer-newer t) +;; Define Prelude's directory structure (defvar prelude-dir (file-name-directory load-file-name) "The root dir of the Emacs Prelude distribution.") (defvar prelude-core-dir (expand-file-name "core" prelude-dir) @@ -104,7 +105,7 @@ by Prelude.") (message "Loading Prelude's core...") -;; the core stuff +;; load the core stuff (require 'prelude-packages) (require 'prelude-custom) ;; Needs to be loaded before core, editor and ui (require 'prelude-ui) @@ -139,7 +140,7 @@ by Prelude.") prelude-modules-file (directory-files prelude-personal-dir 't "^[^#\.].*\\.el$")))) -(message "Prelude is ready to do thy bidding, Master %s!" current-user) +(message "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")