From 0ea7241c664644302938a42810cbc8bcc15d8977 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Thu, 25 Feb 2021 17:53:46 -0600
Subject: W h I t E s P a C e

---
 early-init.el | 72 +++++++++++++++++++++++++++++------------------------------
 1 file changed, 36 insertions(+), 36 deletions(-)

(limited to 'early-init.el')

diff --git a/early-init.el b/early-init.el
index 1a26b03..056670a 100644
--- a/early-init.el
+++ b/early-init.el
@@ -18,21 +18,21 @@
 ;; BOOTSTRAP PACKAGE MANAGEMENT
 (let ((win-app-dir "~/Applications"))
   (dolist (path (list
-                 ;; Windows
-                 (expand-file-name "exe" win-app-dir)
-                 (expand-file-name "exe/bin" win-app-dir)
-                 (expand-file-name "Git/bin" win-app-dir)
-                 (expand-file-name "Git/usr/bin" win-app-dir)
-                 (expand-file-name "Git/mingw64/bin" win-app-dir)
-                 (expand-file-name "Everything" win-app-dir)
-                 (expand-file-name "Win-builds/bin" win-app-dir)
-                 (expand-file-name "Z/bin" win-app-dir)
-                 ;; Linux
-                 (expand-file-name "bin" user-emacs-directory)
-                 (expand-file-name "~/bin")
-                 (expand-file-name "~/.local/bin")
-                 (expand-file-name "~/Scripts")
-                 ))
+		 ;; Windows
+		 (expand-file-name "exe" win-app-dir)
+		 (expand-file-name "exe/bin" win-app-dir)
+		 (expand-file-name "Git/bin" win-app-dir)
+		 (expand-file-name "Git/usr/bin" win-app-dir)
+		 (expand-file-name "Git/mingw64/bin" win-app-dir)
+		 (expand-file-name "Everything" win-app-dir)
+		 (expand-file-name "Win-builds/bin" win-app-dir)
+		 (expand-file-name "Z/bin" win-app-dir)
+		 ;; Linux
+		 (expand-file-name "bin" user-emacs-directory)
+		 (expand-file-name "~/bin")
+		 (expand-file-name "~/.local/bin")
+		 (expand-file-name "~/Scripts")
+		 ))
     (when (file-exists-p path)
       (add-to-list 'exec-path path :append))))
 
@@ -43,49 +43,49 @@
   "Bootstrap straight.el."
   (defvar bootstrap-version)
   (let ((bootstrap-file
-         (expand-file-name
-          "straight/repos/straight.el/bootstrap.el"
-          user-emacs-directory))
-        (bootstrap-version 5))
+	 (expand-file-name
+	  "straight/repos/straight.el/bootstrap.el"
+	  user-emacs-directory))
+	(bootstrap-version 5))
     (unless (file-exists-p bootstrap-file)
       (with-current-buffer
-          (url-retrieve-synchronously
-           (concat
-            "https://raw.githubusercontent.com/"
-            "raxod502/straight.el/develop/install.el")
-           'silent 'inhibit-cookies)
-        (goto-char (point-max))
-        (eval-print-last-sexp)))
+	  (url-retrieve-synchronously
+	   (concat
+	    "https://raw.githubusercontent.com/"
+	    "raxod502/straight.el/develop/install.el")
+	   'silent 'inhibit-cookies)
+	(goto-char (point-max))
+	(eval-print-last-sexp)))
     (load bootstrap-file nil 'nomessage)))
 (when (executable-find "git")
   (unless (ignore-errors (acdw/bootstrap-straight))
     (let ((msg "Straight.el didn't bootstrap correctly.  Cloning directly"))
       (message "%s..." msg)
       (call-process "git" nil
-                    (get-buffer-create "*bootstrap-straight-messages*") nil
-                    "clone"
-                    "https://github.com/raxod502/straight.el"
-                    (expand-file-name "straight/repos/straight.el"
-                                      user-emacs-directory))
+		    (get-buffer-create "*bootstrap-straight-messages*") nil
+		    "clone"
+		    "https://github.com/raxod502/straight.el"
+		    (expand-file-name "straight/repos/straight.el"
+				      user-emacs-directory))
       (message "%s...Done." msg)
       (acdw/bootstrap-straight))))
 ;; SETUP FRAME
 (add-to-list 'default-frame-alist
-             '(tool-bar-lines . 0))
+	     '(tool-bar-lines . 0))
 
 (tool-bar-mode -1)
 (add-to-list 'default-frame-alist
-             '(menu-bar-lines . 0))
+	     '(menu-bar-lines . 0))
 
 (menu-bar-mode -1)
 (add-to-list 'default-frame-alist
-             '(vertical-scroll-bars . nil)
-             '(horizontal-scroll-bars . nil))
+	     '(vertical-scroll-bars . nil)
+	     '(horizontal-scroll-bars . nil))
 
 (scroll-bar-mode -1)
 (horizontal-scroll-bar-mode -1)
 (setq-default frame-inhibit-implied-resize t
-              frame-resize-pixelwise t)
+	      frame-resize-pixelwise t)
 (setq-default indicate-empty-lines t)
 (setq-default indicate-buffer-boundaries 'right)
 (setq-default visual-line-fringe-indicators '(left-curly-arrow nil))
-- 
cgit 1.4.1-21-gabe81