From a89b5de62fab0bcf9985258194be89c62cd51861 Mon Sep 17 00:00:00 2001
From: Mountain Man <43313373+MountainMan1312@users.noreply.github.com>
Date: Thu, 24 Aug 2023 17:52:01 -0400
Subject: Add more default named workspaces

---
 init.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/init.el b/init.el
index 4d3a210..13b46cd 100644
--- a/init.el
+++ b/init.el
@@ -174,12 +174,14 @@
   :straight t
   :config
   (require 'exwm-config)
-  (setq exwm-workspace-number 4
+  (setq exwm-workspace-number 6
         exwm-workspace-index-map (lambda (index)
                                    (let ((named-workspaces ["0:Admin"
                                                             "1:Agenda"
                                                             "2:KB"
-                                                            "3:IDE"]))
+                                                            "3:IDE"
+                                                            "4:School"
+                                                            "5:Reading"]))
                                      (if (< index (length named-workspaces))
                                          (elt named-workspaces index)
                                        (number-to-string index))))
-- 
cgit v1.2.3