colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[XMonad] Tweak window bringer string

Browse Source
This commit is contained in:
Ivan Malison 2016-10-22 01:40:48 -07:00
parent 9cdea6132e
commit 2eb8bcd440
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dotfiles/xmonad/xmonad.hs
View File

@ -39,7 +39,7 @@ myDecorateName ws w = do
name <- show <$> getName w name <- show <$> getName w
classTitle <- getClass w classTitle <- getClass w
workspaceToName <- getWorkspaceNames workspaceToName <- getWorkspaceNames
return $ printf "%-20s%-50s %+40s" classTitle name $ "in " ++ workspaceToName (W.tag ws) return $ printf "%-20s%-40s %+30s" classTitle (take 40 name) "in " ++ workspaceToName (W.tag ws)
myWindowBringerConfig = WindowBringerConfig { menuCommand = "rofi" myWindowBringerConfig = WindowBringerConfig { menuCommand = "rofi"
, menuArgs = ["-dmenu", "-i"] , menuArgs = ["-dmenu", "-i"]