diff options
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Main.hs b/src/Main.hs index 77a53a0..21bc4ba 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -12,6 +12,7 @@ import Text.Printf import Internal.Keys import Internal.LayoutDraw +import Data.List (partition, isPrefixOf) main = do @@ -59,6 +60,8 @@ main = do , ppSep = xmobarColor "#404040" "" " ──── " , ppExtras = [showLayout] + , ppOrder = \ss -> + let (icons, etc) = partition ("<icon"`isPrefixOf`) ss in icons ++ etc } toggleStructsKey config { modMask = mod4Mask } |