From 9879d7f43c376246c0c5adb5ab8374a9435f35f4 Mon Sep 17 00:00:00 2001 From: ndwarshuis Date: Wed, 25 Mar 2020 18:35:04 -0400 Subject: [PATCH] REF remove print statement --- lib/DBus/Screensaver.hs | 17 ++++++++--------- 1 file changed, 8 insertions(+), 9 deletions(-) diff --git a/lib/DBus/Screensaver.hs b/lib/DBus/Screensaver.hs index 6c63ebb..1f437e4 100644 --- a/lib/DBus/Screensaver.hs +++ b/lib/DBus/Screensaver.hs @@ -10,18 +10,18 @@ module DBus.Screensaver , matchSignal ) where -import Control.Monad (void) +import Control.Monad (void) -import DBus -import DBus.Client -import DBus.Internal +import DBus +import DBus.Client +import DBus.Internal -import Graphics.X11.Xlib.Display -import Graphics.X11.XScreenSaver +import Graphics.X11.Xlib.Display +import Graphics.X11.XScreenSaver -import Shell +import Shell -import XMonad +import XMonad -------------------------------------------------------------------------------- -- | Low-level functions @@ -42,7 +42,6 @@ query :: IO SSState query = do dpy <- openDisplay "" xssi <- xScreenSaverQueryInfo dpy - print xssi closeDisplay dpy return $ case xssi of Just XScreenSaverInfo { xssi_state = ScreenSaverDisabled } -> False