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

[XMonad] Add taffybar support

Browse Source
This commit is contained in:
Ivan Malison 2016-09-19 12:09:58 -07:00
parent d74c29dea7
commit 86296a4b13
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
3 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
dotfiles/lib/bin/restart_taffybar.sh Executable file
View File

@ -0,0 +1,3 @@
#!/usr/bin/env sh
pkill taffybar
taffybar $@

3
dotfiles/xmonad/xmonad.hs
View File

@ -32,7 +32,7 @@ addKeys conf@XConfig {modMask = modm} =
[ ((modm, xK_p), spawn "rofi -show drun") [ ((modm, xK_p), spawn "rofi -show drun")
, ((modm .|. shiftMask, xK_p), spawn "rofi -show run") , ((modm .|. shiftMask, xK_p), spawn "rofi -show run")
, ((modm, xK_g), spawn "rofi -show window") , ((modm, xK_g), spawn "rofi -show window")
-- , ((modm, xK_s), sequence_ [shiftNextScreen, nextScreen]) , ((modm .|. controlMask, xK_t), spawn "restart_taffybar.sh")
-- TODO: Change this to bringing the window to the current workspace -- TODO: Change this to bringing the window to the current workspace
, ((modm, xK_b), bringMenuArgs' "rofi" ["-dmenu"]) , ((modm, xK_b), bringMenuArgs' "rofi" ["-dmenu"])
, ((modm .|. controlMask, xK_space), sendMessage $ JumpToLayout "Full") , ((modm .|. controlMask, xK_space), sendMessage $ JumpToLayout "Full")
@ -54,6 +54,7 @@ myLayoutHook = avoidStruts . smartSpacing 10 . noBorders
. mkToggle (MIRROR ?? EOT) $ layouts . mkToggle (MIRROR ?? EOT) $ layouts
myStartup = do myStartup = do
spawn "taffybar"
spawn "nm-applet --sm-disable" spawn "nm-applet --sm-disable"
spawn "xsetroot -solid black" spawn "xsetroot -solid black"
-- TODO: Figure out how to set different backgrounds for different x -- TODO: Figure out how to set different backgrounds for different x

1
dotfiles/xprofile Normal file
View File

@ -0,0 +1 @@
source "$HOME/.lib/shellenv.sh"