diff options
| author | lassulus <lass@aidsballs.de> | 2015-10-31 00:13:32 +0100 |
|---|---|---|
| committer | lassulus <lass@aidsballs.de> | 2015-10-31 00:13:32 +0100 |
| commit | 5b4a34062462311973bb1798fe3e4538e6eb5706 (patch) | |
| tree | 31ac952feeb3f534b57fc48c6ae2f71795be2f43 /tv/2configs/xserver/xmonad/Util/Debunk.hs | |
| parent | 611f8ef25b4c3984f2f7de7362c4869d1f2f124f (diff) | |
| parent | bcaf3771d9503f1b0d01a2c15ca0712ee454342f (diff) | |
Merge remote-tracking branch 'cd/master'
Diffstat (limited to 'tv/2configs/xserver/xmonad/Util/Debunk.hs')
| -rw-r--r-- | tv/2configs/xserver/xmonad/Util/Debunk.hs | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/tv/2configs/xserver/xmonad/Util/Debunk.hs b/tv/2configs/xserver/xmonad/Util/Debunk.hs deleted file mode 100644 index b4772e582..000000000 --- a/tv/2configs/xserver/xmonad/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 - |