From 6bfb7ef9e6b590b3eeaa3bb0ea022251230f11a4 Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Wed, 16 Nov 2022 06:38:11 -0500
Subject: Finally figured out how to use RationalRect

Change-Id: I98e53e9984a98795fec01196bb51e41a2b9597dd
---
 lib/xmonad.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/xmonad.hs b/lib/xmonad.hs
index a2dd180..b3cdffd 100644
--- a/lib/xmonad.hs
+++ b/lib/xmonad.hs
@@ -87,7 +87,8 @@ shouldFloat = do
   name <- appName
   return (fs && not (shouldntFloat name))
 
-scratchHook = scratchpadManageHook (W.RationalRect 0.1 0.1 0.6 0.6)
+-- RationalRect is x y w h
+scratchHook = scratchpadManageHook (W.RationalRect 0.125 0.125 0.75 0.75)
 
 myManageHook = manageDocks <+> scratchHook <+> (shouldFloat --> doFullFloat) <+> manageHook def
 
-- 
cgit v1.2.3