tv xmonad: s/concatMap (++"\n")/unlines/

2015-10-28 20:18:31 +01:00 · 2015-10-28 20:18:31 +01:00 · 737922a20e
parent b7d9c3476b
commit 737922a20e
1 changed files with 1 additions and 1 deletions
--- a/tv/2configs/xserver/xmonad/Util/Shutdown.hs
+++ b/tv/2configs/xserver/xmonad/Util/Shutdown.hs
@ -48,6 +48,6 @@ shutdown = do
  s <- gets (\s -> (wsData s : extState s))
  _ <- io $ do
    path <- getEnv "XMONAD_STATE"
-    writeFile path (concatMap (++"\n") s)
+    writeFile path (unlines s)
    exitSuccess
  return ()