LINUX.ORG.RU

История изменений

Исправление zinfandel, (текущая версия) :

Если целиком, то так 

-- file: .xmobar/xmobarrc
<fc=#fd971f>%StdinReader%</fc>

Если по частям, то так 

-- file: xmonad.hs
main = do    
    xmonad =<< statusBar barExec myPP toggleStrutsKey defaultConfig
	where
		barExec = "xmobar /home/zinfandel/.xmonad/xmobarrc"

myPP :: PP
myPP = xmobarPP { ppCurrent = xmobarColor "#fd971f" ""
                -- separator between elements
                , ppSep     = xmobarColor "#fd971f" "" " ⟫ "
                }

Другие поля PP можно посмотреть в доках.

Исправление zinfandel, :

Если целиком, то так 

-- file: .xmobar/xmobarrc
<fc=#fd971f>%StdinReader%</fc>

Если по частям, то так 

-- file: xmonad.hs
main = do    
    xmonad =<< statusBar barExec myPP toggleStrutsKey defaultConfig
	where
		barExec = "xmobar /home/kostia/.xmonad/xmobarrc"

myPP :: PP
myPP = xmobarPP { ppCurrent = xmobarColor "#fd971f" ""
                -- separator between elements
                , ppSep     = xmobarColor "#fd971f" "" " ⟫ "
                }

Другие поля для PP можно посмотреть в доках.

Исправление zinfandel, :

Если целиком, то так 

-- file: .xmobar/xmobarrc
<fc=#fd971f>%StdinReader%</fc>

Если по частям, то так 

-- file: xmonad.hs
main = do    
    xmonad =<< statusBar barExec myPP toggleStrutsKey defaultConfig
	where
		barExec = "xmobar /home/kostia/.xmonad/xmobarrc"

myPP :: PP
myPP = xmobarPP { ppCurrent = xmobarColor orange ""
                -- separator between elements
                , ppSep     = xmobarColor orange "" " ⟫ "
                }

Другие поля для PP можно посмотреть в доках.

Исправление zinfandel, :

Если целиком, то так 

-- file: .xmobar/xmobarrc
<fc=#fd971f>%StdinReader%</fc>

Если по частям, то так 

-- file: xmonad.hs
main = do    
    xmonad =<< statusBar barExec myPP toggleStrutsKey defaultConfig
	where
		barExec = "xmobar /home/kostia/.xmonad/xmobarrc"

myPP :: PP
myPP = xmobarPP { ppCurrent = xmobarColor orange ""
                -- separator between elements
                , ppSep     = xmobarColor orange "" " ⟫ "
                }

Исходная версия zinfandel, :

Если целиком, то так 

-- file: .xmobar/xmobarrc
<fc=#fd971f>%StdinReader%</fc>

Если по частям, то так 

-- file: xmonad.hs
main = do    
    xmonad =<< statusBar barExec myPP toggleStrutsKey defaultConfig
	where
		barExec = "xmobar /home/kostia/.xmonad/xmobarrc"

myPP :: PP
myPP = xmobarPP { ppCurrent = xmobarColor orange ""
                -- separator between elements
                , ppSep     = xmobarColor orange "" " ⟫ "
                -- order in which we have to show elements (title is ignored)
                , ppOrder   = \(ws:l:_) -> [ws, l]
                -- show only workspaces that are predefined by me
                , ppHidden  = \w -> if elem w myWorkspaces then w else ""
                -- short 'titles' for layouts
                , ppLayout  = \n -> case n of
                                "Full" -> "[ ]"
                                "Tall" -> "[|]"
                                "Mirror Tall" -> "[—]"  
                                _      -> n
                }