Tabs for indentation, spaces for alignment

1 files changed, 50 insertions, 46 deletions

diff --git a/emacs/inits/01-basic.el b/emacs/inits/01-basic.el
index 090ff55..c3d540d 100644
--- a/emacs/inits/01-basic.el
+++ b/emacs/inits/01-basic.el
@@ -1,4 +1,4 @@
-;; Time-stamp: <2020-08-12 22:14:12 (user@hobbies)>
+;; Time-stamp: <2021-01-04 15h39 EST (hobbies)>
 
 ;; -----------------------------------------------------------------------------
 ;; Interface
@@ -9,41 +9,45 @@
 (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)))
 
 (blink-cursor-mode 0)
 (setq cursor-type 'box)
 (set-cursor-color "black")
 
 (add-to-list 'custom-theme-load-path "~/.emacs.d/themes/")
-(when (eq 'x (window-system))
-  (use-package gruvbox-theme
-    :ensure t
-    :config (load-theme 'gruvbox-dark-soft t))
-  (set-face-attribute 'region nil :background "orange")
-  (set-face-attribute 'default nil :font "Iosevka-14"))
+
+(use-package gruvbox-theme
+	:ensure t
+	:config
+	(when (eq 'x (window-system))
+		(load-theme 'gruvbox-dark-soft t)
+		;; (set-face-attribute 'region nil :background "orange")
+		(set-face-attribute 'default nil :font "Iosevka-16")))
+
+
 
 (set-fringe-style 0)
 ;; (set-fringe-mode 128)
@@ -52,11 +56,11 @@
 ;; Backups
 
 (setq backup-by-copying t
-      backup-directory-alist '((".*" . "~/store/backups/"))
-      delete-old-versions t
-      kept-new-versions 6
-      kept-old-versions 2
-      version-control t)
+			backup-directory-alist '((".*" . "~/store/backups/"))
+			delete-old-versions t
+			kept-new-versions 6
+			kept-old-versions 2
+			version-control t)
 
 (setq create-lockfiles nil)
 
@@ -67,13 +71,13 @@
 
 (setq standard-indent 2)
 (setq-default tab-width 2
-              indent-tabs-mode nil)
+							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)
@@ -86,14 +90,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)
@@ -104,19 +108,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)
 
@@ -124,8 +128,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 "~/")))