From 5b7e0db847c46affc207c327835d1efd3b2727de Mon Sep 17 00:00:00 2001
From: Mattias Andrée <maandree@kth.se>
Date: Sat, 25 Nov 2023 18:08:34 +0100
Subject: Misc updates
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Mattias Andrée <maandree@kth.se>
---
 xmonad/xmonad.hs.gpp | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

(limited to 'xmonad/xmonad.hs.gpp')

diff --git a/xmonad/xmonad.hs.gpp b/xmonad/xmonad.hs.gpp
index 6a9358e..7a6f960 100644
--- a/xmonad/xmonad.hs.gpp
+++ b/xmonad/xmonad.hs.gpp
@@ -54,12 +54,16 @@ import qualified Data.Map as M
 
 
 $$<
+	hostname="$(hostname | tr '[[:upper:]]' '[[:lower:]]')"
+
 	workspace_1=main
-	if test "$(hostname | tr '[[:upper:]]' '[[:lower:]]')" = zenith; then
+	if test "$hostname" = zenith; then
 		workspace_7=chat
 		workspace_8=mail
+		workspace_9=media
+	else
+		workspace_9=off
 	fi
-	workspace_9=media
 
 	modmask=mod4Mask # Super_L
 	focus_on_hover=True
@@ -163,6 +167,8 @@ $$>fi
     {-- TODO , (( $${modmask} .|. shiftMask , xK_m), sendMessage RestoreNextMinimizedWin) --}
     ]
 
+{-- TODO preselect workspace 9 on secondary monitor --}
+
 
 ---- ==== Layout settings ==== ----
 ratios = [ toRational (2/(1 + sqrt 5 :: Double)) -- golden ratio
-- 
cgit v1.2.3-70-g09d2