diff options
| -rw-r--r-- | .config/XMonad/xmonad.hs | 25 | ||||
| -rwxr-xr-x | .xinitrc | 5 | ||||
| -rw-r--r-- | .zprofile | 9 |
3 files changed, 26 insertions, 13 deletions
diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs index da68a7a..ca0c368 100644 --- a/.config/XMonad/xmonad.hs +++ b/.config/XMonad/xmonad.hs @@ -52,6 +52,7 @@ import XMonad.Util.NamedScratchpad myStartupHook :: X () myStartupHook = do spawnOn " 二 ""librewolf" + spawnOnce "polybar mybar" setWMName "LG3D" setDefaultCursor xC_left_ptr @@ -335,21 +336,21 @@ myTabTheme = def { fontName = myFont } -- layouts -myGap = spacingRaw False (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True +myGap = spacingRaw True (Border sGap sGap sGap sGap) True (Border wGap wGap wGap wGap) True myLayoutHook = avoidStruts ( -- layouts to be used in almost every workspace - renamed [R.Replace "BSP"] (maximize $ windowNavigation $ myGap $ emptyBSP) + renamed [R.Replace "BSP"] (maximize $ smartBorders $ windowNavigation $ myGap $ emptyBSP) ||| renamed [R.Replace "Tabbed"] (maximize $ smartBorders $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme) - ||| renamed [R.Replace "Accordion"] (maximize $ windowNavigation $ myGap $ Accordion) - ||| renamed [R.Replace "ZoomRow"] (maximize $ windowNavigation $ myGap $ zoomRow) - ||| renamed [R.Replace "TwoPane"] (maximize $ windowNavigation $ myGap $ TwoPane (3/100) (1/2)) - ||| renamed [R.Replace "ZoomRow Mirrored"] (maximize $ windowNavigation $ myGap $ Mirror zoomRow) - ||| renamed [R.Replace "ThreeCol Mid (1)"] (maximize $ windowNavigation $ myGap $ ThreeColMid 1 (3/100) (1/2)) - ||| renamed [R.Replace "ThreeCol Mid (2)"] (maximize $ windowNavigation $ myGap $ ThreeColMid 2 (3/100) (1/2)) - ||| renamed [R.Replace "Grid"] (maximize $ windowNavigation $ myGap $ Grid) - ||| renamed [R.Replace "ThreeCol (1)"] (maximize $ windowNavigation $ myGap $ ThreeCol 1 (3/100) (1/2)) - ||| renamed [R.Replace "Tabbed"] (maximize $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme) - ||| renamed [R.Replace "ThreeCol (2)"] (maximize $ windowNavigation $ myGap $ ThreeCol 2 (3/100) (1/2)) + ||| renamed [R.Replace "Accordion"] (maximize $ smartBorders $ windowNavigation $ myGap $ Accordion) + ||| renamed [R.Replace "ZoomRow"] (maximize $ smartBorders $ windowNavigation $ myGap $ zoomRow) + ||| renamed [R.Replace "TwoPane"] (maximize $ smartBorders $ windowNavigation $ myGap $ TwoPane (3/100) (1/2)) + ||| renamed [R.Replace "ZoomRow Mirrored"] (maximize $ smartBorders $ windowNavigation $ myGap $ Mirror zoomRow) + ||| renamed [R.Replace "ThreeCol Mid (1)"] (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeColMid 1 (3/100) (1/2)) + ||| renamed [R.Replace "ThreeCol Mid (2)"] (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeColMid 2 (3/100) (1/2)) + ||| renamed [R.Replace "Grid"] (maximize $ smartBorders $ windowNavigation $ myGap $ Grid) + ||| renamed [R.Replace "ThreeCol (1)"] (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeCol 1 (3/100) (1/2)) + ||| renamed [R.Replace "Tabbed"] (maximize $ smartBorders $ windowNavigation $ myGap $ tabbed shrinkText myTabTheme) + ||| renamed [R.Replace "ThreeCol (2)"] (maximize $ smartBorders $ windowNavigation $ myGap $ ThreeCol 2 (3/100) (1/2)) ) main :: IO () @@ -27,9 +27,12 @@ fi nitrogen --restore & picom & dunst & -polybar mybar & +cbatticon & #xmodmap .Xmodmap +# launch this from wm or it'll crash +# polybar mybar & + case $1 in xmonad) exec xmonad ;; # openbox) exec openbox-session & tint2 ;; @@ -1,3 +1,12 @@ #!/bin/sh [[ -f ~/.config/zsh/.zshenv ]] && source ~/.config/zsh/.zshenv +startpage & + +alias startx="startx ~/.xinitrc" +alias xm="startx xmonad" +alias ob="startx openbox" + +clear +echo "Welcome, VidhuKant!" +echo "run startx <xm/ob> to open XMonad/Openbox" |