diff options
author | tv <tv@shackspace.de> | 2015-10-24 22:31:10 +0200 |
---|---|---|
committer | tv <tv@shackspace.de> | 2015-10-24 22:31:10 +0200 |
commit | 0306ec4294f6d825ca65c7b0c98a80a3bced8fdf (patch) | |
tree | eb9e3772407963c25a4d6bd8125b3a2a72bb29ca /tv/2configs/xserver/xmonad-tv/Util/Debunk.hs | |
parent | b2deab26bd52a994003cafc33872b6c084cdd716 (diff) |
tv: lol display-manager
Diffstat (limited to 'tv/2configs/xserver/xmonad-tv/Util/Debunk.hs')
-rw-r--r-- | tv/2configs/xserver/xmonad-tv/Util/Debunk.hs | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/tv/2configs/xserver/xmonad-tv/Util/Debunk.hs b/tv/2configs/xserver/xmonad-tv/Util/Debunk.hs deleted file mode 100644 index b4772e58..00000000 --- a/tv/2configs/xserver/xmonad-tv/Util/Debunk.hs +++ /dev/null @@ -1,16 +0,0 @@ -module Util.Debunk - ( printToErrors - ) where - -import XMonad -import System.FilePath ( (</>) ) -import Control.Exception ( bracket ) -import System.IO ( hPrint, stderr, openFile, hClose, IOMode( AppendMode ) ) - - -printToErrors x = do - dir <- getXMonadDir - let base = dir </> "xmonad" - err = base ++ ".errors" - bracket (openFile err AppendMode) hClose $ \h -> hPrint h x - |