diff options
| author | Josh Rahm <joshuarahm@gmail.com> | 2022-04-16 00:54:01 -0600 |
|---|---|---|
| committer | Josh Rahm <joshuarahm@gmail.com> | 2022-10-09 12:19:46 -0600 |
| commit | 1ad36bd0e332bfe4354c9966191603f116196ecd (patch) | |
| tree | 6baf9a882b5df229d648df3ecb956ca5313bc791 /src/Rahm/Desktop | |
| parent | 1ba923704e7889205f574de1b85f48773ec6aca7 (diff) | |
| download | rde-1ad36bd0e332bfe4354c9966191603f116196ecd.tar.gz rde-1ad36bd0e332bfe4354c9966191603f116196ecd.tar.bz2 rde-1ad36bd0e332bfe4354c9966191603f116196ecd.zip | |
Remove the "│" from xmobar. I think it makes it cleaner, but it is not a slam dunk.
Diffstat (limited to 'src/Rahm/Desktop')
| -rw-r--r-- | src/Rahm/Desktop/XMobarLog.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Rahm/Desktop/XMobarLog.hs b/src/Rahm/Desktop/XMobarLog.hs index f2cccf8..637670e 100644 --- a/src/Rahm/Desktop/XMobarLog.hs +++ b/src/Rahm/Desktop/XMobarLog.hs @@ -46,7 +46,7 @@ xMobarLogHook (XMobarLog xmproc) = do hPutStrLn xmproc $ trunc 80 $ execWriter $ do tell " " tell layoutXpm - tell $ "<fc=#404040> │ </fc>" + tell $ " " forM_ wss $ \(t, ws) -> do case t of @@ -57,7 +57,7 @@ xMobarLogHook (XMobarLog xmproc) = do tell $ toAction $ S.tag ws tell " </fc></fn>" - tell $ "<fc=#404040>│ </fc><fc=#a0a0a0><fn=3>" + tell $ " <fc=#a0a0a0><fn=3>" tell $ title tell $ "</fn></fc>" |