From 8d738b2e316faa7b95ae2896860231d8524af980 Mon Sep 17 00:00:00 2001
From: Thanos Apollo <public@thanosapollo.com>
Date: Thu, 15 Jun 2023 14:37:41 +0300
Subject: emacs: Update UI configuration and add auto-insertions

---
 emacs.org | 33 ++++++++++++++++++++++++---------
 1 file changed, 24 insertions(+), 9 deletions(-)

diff --git a/emacs.org b/emacs.org
index b80869e..45ba744 100755
--- a/emacs.org
+++ b/emacs.org
@@ -158,18 +158,18 @@ Fonts and basic appearance settings for each device
 		  shell-mode-hook
 		  eshell-mode-hook
 		  vterm-mode-hook
-		  elfeed))
+		  elfeed
+		  vterm-mode))
     (add-hook mode (lambda () (display-line-numbers-mode 0))))
 
   ;; Set font-size for each device
   (if is-hermes
-      (set-frame-font "JetBrains Mono 12" nil t)
-    (set-frame-font "JetBrains Mono 14" nil t))
-
-  ;; Don't display battery-mode on desktop
-  (if is-zeus
-      (display-battery-mode 0)
-    (display-battery-mode 1))
+      (set-face-attribute 'default nil
+			  :font "Jetbrains Mono"
+			  :height 120)
+    (set-face-attribute 'default nil
+			:font "Jetbrains Mono"
+			:height 135))
 #+end_src
 ** Theme & modeline
 #+begin_src emacs-lisp
@@ -177,6 +177,11 @@ Fonts and basic appearance settings for each device
   (doom-modeline-mode 1)
 
   (setq doom-modeline-height 35)
+
+  ;; Don't display battery-mode on desktop
+  (if is-zeus
+      (display-battery-mode 0)
+    (display-battery-mode 1))
 #+end_src
 ** Ivy
 #+begin_src emacs-lisp
@@ -547,6 +552,15 @@ Fonts and basic appearance settings for each device
 #+begin_src emacs-lisp
   (require 'magit)
 #+end_src
+
+** Auto-insertions
++ Shell scripting/bash 
+#+begin_src emacs-lisp
+  (define-auto-insert '("\\.sh\\'" . "Bash skeleton")
+    '("Description:" \n
+      "#!/bin/bash"))
+  (add-hook 'shell-script-mode #'auto-insert)
+#+end_src
 ** Emacs lisp
 #+begin_src emacs-lisp
   (setq tab-always-indent 'complete)
@@ -765,12 +779,13 @@ Create function to watch videos using ~mpv~
 #+end_src
 * EMMS
 #+begin_src emacs-lisp
+  (require 'emms)
   (emms-all)
   (setq emms-player-list '(emms-player-mpv)
 	emms-player-mpv-parameters '("--no-video")
 	emms-info-functions '(emms-info-native)
 	emms-playlist-buffer-name "*Music*"
-	emms-source-file-default-directory "~/Music/work-playlists")
+	emms-source-file-default-directory "~/Music/")
 #+end_src
 ** Keybindings
 #+begin_src emacs-lisp
-- 
cgit v1.2.3