Fixed tabs!

1 files changed, 47 insertions, 47 deletions

diff --git a/emacs/inits/01-basic.el b/emacs/inits/01-basic.el
index bc1bad9..54848c9 100644
--- a/emacs/inits/01-basic.el
+++ b/emacs/inits/01-basic.el
@@ -1,4 +1,4 @@
-;; Time-stamp: <2021-09-05 20h52 EDT (hobbies)>
+;; Time-stamp: <2021-09-27 08h47 EDT (hobbies)>
 
 ;; -----------------------------------------------------------------------------
 ;; Interface
@@ -9,40 +9,40 @@
 (fset 'yes-or-no-p 'y-or-n-p)
 
 (setq select-enable-clipboard t
-			select-enable-primary t
-			save-interprogram-paste-before-kill t
-			require-final-newline t
-			visible-bell nil)
+      select-enable-primary t
+      save-interprogram-paste-before-kill t
+      require-final-newline t
+      visible-bell nil)
 
 (setq echo-keystrokes 0.1
-			confirm-kill-emacs 'y-or-n-p
-			disabled-command-function nil
-			ring-bell-function 'ignore)
+      confirm-kill-emacs 'y-or-n-p
+      disabled-command-function nil
+      ring-bell-function 'ignore)
 
 (size-indication-mode t)
 
 (defun enlarge-to-fill ()
-	"Stretch the buffer to accomodate `fill-column` many columns."
-	(interactive)
-	(let ((ww (window-width)))
-		(when (< ww (+ 1 fill-column))
-			(enlarge-window-horizontally (- (+ 1 fill-column) ww)))))
+  "Stretch the buffer to accomodate `fill-column` many columns."
+  (interactive)
+  (let ((ww (window-width)))
+    (when (< ww (+ 1 fill-column))
+      (enlarge-window-horizontally (- (+ 1 fill-column) ww)))))
 
 (global-set-key (kbd "C-c 3") (lambda ()
-																(interactive)
-																(split-window-horizontally)
-																(enlarge-to-fill)))
+				(interactive)
+				(split-window-horizontally)
+				(enlarge-to-fill)))
 
 (add-to-list 'custom-theme-load-path "~/.emacs.d/themes/")
 
 (when (eq 'x (window-system))
 	;;; Time-based theming
-	(if (<= 20 (nth 2 (decode-time)))
-			(load-theme 'nord t)
-		(load-theme 'solo-jazz t))
-	;; (load-theme 'solo-jazz t) ;; turns out i just like this one though
-	;; (set-face-attribute 'region nil :background "orange")
-	(set-face-attribute 'default nil :font "Iosevka-18"))
+  (if (<= 20 (nth 2 (decode-time)))
+      (load-theme 'nord t)
+    (load-theme 'solo-jazz t))
+  ;; (load-theme 'solo-jazz t) ;; turns out i just like this one though
+  ;; (set-face-attribute 'region nil :background "orange")
+  (set-face-attribute 'default nil :font "Iosevka-18"))
 
 (blink-cursor-mode 0)
 (setq cursor-type 'box)
@@ -55,11 +55,11 @@
 ;; Backups
 
 (setq backup-by-copying t
-			backup-directory-alist '(("." . "/home/user/store/backups/"))
-			delete-old-versions t
-			kept-new-versions 6
-			kept-old-versions 2
-			version-control t)
+      backup-directory-alist '(("." . "/home/user/store/backups/"))
+      delete-old-versions t
+      kept-new-versions 6
+      kept-old-versions 2
+      version-control t)
 
 (setq create-lockfiles nil)
 
@@ -69,14 +69,14 @@
 (setq fill-column 80)
 
 (setq standard-indent 2)
-(setq-default tab-width 2
-							indent-tabs-mode t)
+(setq-default tab-width 8
+	      indent-tabs-mode t)
 (add-hook 'before-save-hook #'whitespace-cleanup)
 
 (show-paren-mode t)
 
 (setq-default truncate-lines t
-							truncate-partial-width-windows nil)
+	      truncate-partial-width-windows nil)
 (setq scroll-step 1)
 
 (setq next-line-add-newlines nil)
@@ -89,14 +89,14 @@
 ;; Basic packages
 
 (use-package recentf
-	:demand t
-	:config
-	(setq recentf-max-saved-items 42)
-	(recentf-mode))
+  :demand t
+  :config
+  (setq recentf-max-saved-items 42)
+  (recentf-mode))
 
 (use-package uniquify
-	:config
-	(setq uniquify-buffer-name-style 'forward))
+  :config
+  (setq uniquify-buffer-name-style 'forward))
 
 (require 'saveplace)
 (save-place-mode)
@@ -107,19 +107,19 @@
 ;;   (global-undo-tree-mode 1))
 
 (use-package keyfreq
-	:ensure t
-	:config
-	(setq keyfreq-file "~/.emacs.d/keyfreq"
-				keyfreq-file-lock "~/.emacs.d/keyfreq.lock")
-	(keyfreq-mode 1)
-	(keyfreq-autosave-mode 1))
+  :ensure t
+  :config
+  (setq keyfreq-file "~/.emacs.d/keyfreq"
+	keyfreq-file-lock "~/.emacs.d/keyfreq.lock")
+  (keyfreq-mode 1)
+  (keyfreq-autosave-mode 1))
 
 ;; -----------------------------------------------------------------------------
 ;; Scratch buffer
 
 (defun immortal-scratch ()
-	(if (eq (current-buffer) (get-buffer "*scratch*"))
-			(progn (bury-buffer) nil) t))
+  (if (eq (current-buffer) (get-buffer "*scratch*"))
+      (progn (bury-buffer) nil) t))
 
 (add-hook 'kill-buffer-query-functions 'immortal-scratch)
 
@@ -127,8 +127,8 @@
 (defun display-startup-echo-area-message () nil)
 
 (setq initial-scratch-message nil
-			initial-buffer-choice t)
+      initial-buffer-choice t)
 
 (add-hook 'after-init-hook
-					(lambda ()
-						(setq default-directory "~/")))
+	  (lambda ()
+	    (setq default-directory "~/")))