Updating dotfiles.

This commit is contained in:
Derek Taylor
2020-09-29 16:28:27 -05:00
parent e8ae19d7ad
commit af5b75ee4d
204 changed files with 1870 additions and 2063 deletions

View File

@@ -146,7 +146,7 @@ myBorderWidth :: Dimension
myBorderWidth = 2 -- Sets border width for windows
myNormColor :: String
myNormColor = "#292d3e" -- Border color of normal windows
myNormColor = "#282c34" -- Border color of normal windows
myFocusColor :: String
myFocusColor = "#bbc5ff" -- Border color of focused windows
@@ -168,7 +168,7 @@ myStartupHook = do
spawnOnce "picom &"
spawnOnce "nm-applet &"
spawnOnce "volumeicon &"
spawnOnce "trayer --edge top --align right --widthtype request --padding 6 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x292d3e --height 22 &"
spawnOnce "trayer --edge top --align right --widthtype request --padding 6 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x282c34 --height 22 &"
spawnOnce "/usr/bin/emacs --daemon &"
-- spawnOnce "kak -d -s mysession &"
setWMName "LG3D"
@@ -181,11 +181,11 @@ and lets the user select from it with the cursor/hjkl keys or the mouse.
#+BEGIN_SRC haskell
myColorizer :: Window -> Bool -> X (String, String)
myColorizer = colorRangeFromClassName
(0x29,0x2d,0x3e) -- lowest inactive bg
(0x29,0x2d,0x3e) -- highest inactive bg
(0x28,0x2c,0x34) -- lowest inactive bg
(0x28,0x2c,0x34) -- highest inactive bg
(0xc7,0x92,0xea) -- active bg
(0xc0,0xa7,0x9a) -- inactive fg
(0x29,0x2d,0x3e) -- active fg
(0x28,0x2c,0x34) -- active fg
-- gridSelect menu layout
mygridConfig :: p -> GSConfig Window
@@ -338,7 +338,7 @@ treeselectAction a = TS.treeselectAction a
, Node (TS.TSNode "OMG Ubuntu" "Ubuntu news, apps and reviews" (spawn (myBrowser ++ "https://www.omgubuntu.co.uk"))) []
]
, Node (TS.TSNode "+ Window Managers" "window manager documentation" (return ()))
[ Node (TS.TSNode "Awesome" "awesomewm documentation" (return ()))
[ Node (TS.TSNode "+ Awesome" "awesomewm documentation" (return ()))
[ Node (TS.TSNode "Awesome" "Homepage for awesome wm" (spawn (myBrowser ++ "https://awesomewm.org/"))) []
, Node (TS.TSNode "Awesome GitHub" "The GutHub page for awesome" (spawn (myBrowser ++ "https://github.com/awesomeWM/awesome"))) []
, Node (TS.TSNode "r/awesome" "Subreddit for awesome" (spawn (myBrowser ++ "https://www.reddit.com/r/awesomewm/"))) []
@@ -493,16 +493,16 @@ second-level nodes. SUPER+ALT+KEY are third-level nodes.
#+BEGIN_SRC haskell
tsDefaultConfig :: TS.TSConfig a
tsDefaultConfig = TS.TSConfig { TS.ts_hidechildren = True
, TS.ts_background = 0xdd292d3e
, TS.ts_background = 0xdd282c34
, TS.ts_font = myFont
, TS.ts_node = (0xffd0d0d0, 0xff202331)
, TS.ts_nodealt = (0xffd0d0d0, 0xff292d3e)
, TS.ts_node = (0xffd0d0d0, 0xff1c1f24)
, TS.ts_nodealt = (0xffd0d0d0, 0xff282c34)
, TS.ts_highlight = (0xffffffff, 0xff755999)
, TS.ts_extra = 0xffd0d0d0
, TS.ts_node_width = 200
, TS.ts_node_height = 20
, TS.ts_originX = 0
, TS.ts_originY = 0
, TS.ts_originX = 100
, TS.ts_originY = 100
, TS.ts_indent = 80
, TS.ts_navigate = myTreeNavigation
}
@@ -531,8 +531,8 @@ myTreeNavigation = M.fromList
dtXPConfig :: XPConfig
dtXPConfig = def
{ font = myFont
, bgColor = "#292d3e"
, fgColor = "#d0d0d0"
, bgColor = "#282c34"
, fgColor = "#bbc2cf"
, bgHLight = "#c792ea"
, fgHLight = "#000000"
, borderColor = "#535974"
@@ -750,10 +750,10 @@ tabs = renamed [Replace "tabs"]
$ tabbed shrinkText myTabConfig
where
myTabConfig = def { fontName = "xft:Mononoki Nerd Font:regular:pixelsize=11"
, activeColor = "#292d3e"
, activeColor = "#282c34"
, inactiveColor = "#3e445e"
, activeBorderColor = "#292d3e"
, inactiveBorderColor = "#292d3e"
, activeBorderColor = "#282c34"
, inactiveBorderColor = "#282c34"
, activeTextColor = "#ffffff"
, inactiveTextColor = "#d0d0d0"
}
@@ -1034,8 +1034,8 @@ main = do
, focusedBorderColor = myFocusColor
, logHook = workspaceHistoryHook <+> myLogHook <+> dynamicLogWithPP xmobarPP
{ ppOutput = \x -> hPutStrLn xmproc0 x >> hPutStrLn xmproc1 x >> hPutStrLn xmproc2 x
, ppCurrent = xmobarColor "#c3e88d" "" . wrap "[" "]" -- Current workspace in xmobar
, ppVisible = xmobarColor "#c3e88d" "" -- Visible but not current workspace
, ppCurrent = xmobarColor "#98be65" "" . wrap "[" "]" -- Current workspace in xmobar
, ppVisible = xmobarColor "#98be65" "" -- Visible but not current workspace
, ppHidden = xmobarColor "#82AAFF" "" . wrap "*" "" -- Hidden workspaces in xmobar
, ppHiddenNoWindows = xmobarColor "#c792ea" "" -- Hidden workspaces (no windows)
, ppTitle = xmobarColor "#b3afc2" "" . shorten 60 -- Title of active window in xmobar