From 97b0dc2e8b9b605c7d531f3ff0eecf0785778c49 Mon Sep 17 00:00:00 2001
From: ndwarshuis <ndwar@yavin4.ch>
Date: Sat, 14 Mar 2020 02:08:59 -0400
Subject: [PATCH] REF remove debug print

---
 xmonad.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/xmonad.hs b/xmonad.hs
index d430b4c..ffa6f5d 100644
--- a/xmonad.hs
+++ b/xmonad.hs
@@ -204,7 +204,6 @@ myEventHook ClientMessageEvent { ev_message_type = t, ev_data = d }
     if | magic == magicString -> removeEmptyWorkspaceByTag' tag
        | magic == acpiMagic -> do
          let acpiTag = readMaybe tag :: Maybe ACPIEvent
-         io $ print acpiTag
          forM_ acpiTag $ \case
            Power -> myPowerPrompt
            Sleep -> confirmPrompt myPromptTheme "suspend?" runSuspend