emacs: Update stumpwm & add nov config

1 files changed, 14 insertions, 3 deletions

diff --git a/emacs.org b/emacs.org
index 7cea165..1cf5481 100755
--- a/emacs.org
+++ b/emacs.org
@@ -1,4 +1,3 @@
-
 #+TITLE: Emacs Configuration
 #+AUTHOR: Thanos Apollo
 #+PROPERTY: header-args :tangle ~/.emacs.d/init.el :mkdirp yes
@@ -68,7 +67,7 @@ Request the following packages:
 	   org-superstar pdf-tools org-auto-tangle sly
 	   org-download eshell-git-prompt eshell-vterm
 	   hackernews circe gptel beacon ement mu4e-alert
-	   pass eat nov yeetube))
+	   pass eat nov yeetube stumpwm-mode))
 #+end_src
 ** Installation & activation
 Set ~package-archives~, and install packages
@@ -1082,7 +1081,7 @@ Create function to watch videos using ~mpv~
 	      (with-face "\nλ" 'eshell-git-prompt-multiline-sign-face)))
       (setq command (with-face " " 'eshell-git-prompt-multiline-command-face))
 
-      ;; Build prompt
+
       (eshell-git-prompt---str-read-only
        (concat hr dir separator git git-dirty separator time sign command))))
 
@@ -1377,6 +1376,7 @@ Create function to watch videos using ~mpv~
 * Extras
 ** StumpWM
 #+begin_src emacs-lisp
+  (require 'stumpwm-mode)
   (setq stumpwm-shell-program "~/.stumpwm.d/modules/util/stumpish/stumpish")
 #+end_src
 ** pdf-tools
@@ -1389,6 +1389,16 @@ Create function to watch videos using ~mpv~
   (add-hook 'pdf-view-mode-hook 'pdf-view-midnight-minor-mode)
   (add-to-list 'auto-mode-alist '("\\.pdf\\'" . 'pdf-view-mode))
 #+end_src
+** nov
+#+begin_src emacs-lisp
+  (add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode))
+
+  (defun my-nov-font-setup ()
+    (face-remap-add-relative 'variable-pitch
+			     :family "Jetbrains Mono"
+			     :height 100))
+  (add-hook 'nov-mode-hook 'my-nov-font-setup)
+#+end_src
 ** Random functions
 #+begin_src emacs-lisp
   (defun thanos/center-buffer ()
@@ -1492,3 +1502,4 @@ Create function to watch videos using ~mpv~
   (define-key Create (kbd "e") 'create-scratch)
   ;; 
 #+end_src
+