ndwarshuis
/
xmonad-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

REF remove old print code

This commit is contained in:
Nathan Dwarshuis 2020-03-17 18:18:20 -04:00
parent 77204f8177
commit 0c037acaac
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lib/Xmobar/Screensaver.hs
View File

@ -1,7 +1,5 @@
module Xmobar.Screensaver where module Xmobar.Screensaver where
-- import Control.Monad
import Graphics.X11.Xlib.Display import Graphics.X11.Xlib.Display
import Graphics.X11.XScreenSaver import Graphics.X11.XScreenSaver
@ -20,7 +18,6 @@ run' :: (String, String, String) -> IO String
run' (text, colorOn, colorOff) = do run' (text, colorOn, colorOff) = do
dpy <- openDisplay "" dpy <- openDisplay ""
xssi <- xScreenSaverQueryInfo dpy xssi <- xScreenSaverQueryInfo dpy
print "hi"
closeDisplay dpy closeDisplay dpy
return $ case xssi of return $ case xssi of
Just x -> wrapColor text Just x -> wrapColor text