diff options
| -rw-r--r-- | xmonad.hs | 25 |
1 files changed, 19 insertions, 6 deletions
@@ -30,6 +30,7 @@ import XMonad.Layout.Tabbed -- hooks import XMonad.Hooks.SetWMName import XMonad.Hooks.ManageDocks +import XMonad.Hooks.DynamicLog -- utilities import XMonad.Util.SpawnOnce @@ -46,7 +47,7 @@ myStartupHook = do -- spawnOnce "firefox &" spawnOnce "sxhkd &" spawnOnce "betterlockscreen -l -t 'Welcome, Vidhu Kant!'" - setWMName "AnimeTitsWM" + setWMName "AnimeTits&ThighsWM" setDefaultCursor xC_left_ptr @@ -64,6 +65,9 @@ myModMask = mod4Mask myTerminal :: String myTerminal = "st" +myDmenu :: String +myDmenu = "run_dmenu" + myBrowser :: String myBrowser = "firefox" @@ -73,7 +77,7 @@ myBrowser = "firefox" -- wm variables -nBorder = "#3804f4" -- "#bf00ff" +nBorder = "#1E1F29" -- "#3804f4" -- "#bf00ff" fBorder = "#FB027F" myBorderWidth = 2 @@ -82,12 +86,13 @@ sGap = 3 -- screen gap wGap = 1 -- window gap myExtraWorkspaces = [(xK_0, "10")] -- ,(xK_minus, "tmp"),(xK_equal, "swap")] -myWorkspaces = ["1","2","3","4","5","6","7","8", "9"] ++ (map snd myExtraWorkspaces) +myWorkspaces = ["δΈ€","2","3","4","5","6","7","8", "9"] ++ (map snd myExtraWorkspaces) -- keybindings myKeys = [ - ((mod4Mask, xK_Return), spawn myTerminal) + ((mod4Mask, xK_Return), spawn (myTerminal ++ " -e fish")) + , ((mod1Mask, xK_p), spawn "/home/zt/.config/scripts/run_dmenu") , ((mod1Mask, xK_w), kill1) , ((mod1Mask .|. shiftMask, xK_k), kill1) , ((mod1Mask, xK_o), withFocused $ windows . W.sink) -- unfloat windows @@ -180,9 +185,17 @@ myLayouts = avoidStruts $ mouseResize $ windowNavigation $ myGap $ emptyBSP ||| myLayoutHook = myLayouts +myLemonbarPP = def {ppCurrent = wrap "" "" + , ppHidden = wrap "" "" + , ppHiddenNoWindows = wrap "" "" + , ppTitle = wrap "" "" . shorten 60 + , ppSep = " " + , ppUrgent = wrap "" "" + , ppOrder = \(ws:l:t:ex) -> [ws,l]++ex++[t] + } main = do - xmproc <- spawnPipe "xmobar -b -x 0 /home/zt/.xmonad/xmobarrc" + bar <- spawnPipe "lemonbar -g 1366x21 -b -B '#171520' -p -F '#ffffff' -f 'Source Han Sans JP:size=10' -o -3 -f 'RobotoMono Nerd Font:style=Regular:size=15' -f -n 'mainbar' -o 0" xmonad $ docks def { terminal = myTerminal, @@ -196,7 +209,7 @@ main = do layoutHook = myLayoutHook, -- manageHook = myManageHook, -- handleEventHook = myEventHook, - -- logHook = wallpaperSetterHook, + logHook = dynamicLogWithPP myLemonbarPP { ppOutput = \x -> hPutStrLn bar x }, startupHook = myStartupHook } `additionalKeys` myKeys |