From c1fef3c4c405ad48b0a04ca1d31ca7c1cf18be0d Mon Sep 17 00:00:00 2001
From: ndwarshuis <ndwar@yavin4.ch>
Date: Mon, 2 Jan 2023 18:21:09 -0500
Subject: [PATCH] REF simplify

---
 bin/xmonad.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/xmonad.hs b/bin/xmonad.hs
index e831bbd..9d1774f 100644
--- a/bin/xmonad.hs
+++ b/bin/xmonad.hs
@@ -860,7 +860,7 @@ externalBindings runIO cleanup db =
       , KeyBinding "M-<F8>" "select autorandr profile" $ Left runAutorandrMenu
       , KeyBinding "M-<F9>" "toggle ethernet" $ Left runToggleEthernet
       , KeyBinding "M-<F10>" "toggle bluetooth" $ Left $ runToggleBluetooth sys
-      , KeyBinding "M-<F11>" "toggle screensaver" $ Left $ (liftIO . runIO) <$> callToggle ses
+      , KeyBinding "M-<F11>" "toggle screensaver" $ Left $ liftIO . runIO <$> callToggle ses
       , KeyBinding "M-<F12>" "switch gpu" $ Left runOptimusPrompt
       ]
   ]