REF remove print statement
This commit is contained in:
parent
e8cf056301
commit
9879d7f43c
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue