Basic updates.
This commit is contained in:
parent
08c122f3fd
commit
a3bd316ea2
12 changed files with 352 additions and 152 deletions
|
@ -52,7 +52,7 @@ main = xmonad
|
|||
myConfig = def
|
||||
{ modMask = myModMask
|
||||
, layoutHook = myLayoutHook
|
||||
, manageHook = myManageHook
|
||||
, manageHook = insertPosition End Newer <+> myManageHook
|
||||
, handleEventHook = trayerAboveXmobarEventHook
|
||||
, focusFollowsMouse = myFocusFollowsMouse
|
||||
, terminal = myTerminal
|
||||
|
@ -83,14 +83,15 @@ myStartupHook = do
|
|||
spawn "killall trayer-srg" -- kill current trayer on each restart
|
||||
spawnOnce "sxhkd -c $HOME/.config/sxhkd/general"
|
||||
spawnOnce "gentoo-pipewire-launcher"
|
||||
-- spawnOnce "transmission-daemon"
|
||||
spawnOnce "transmission-daemon"
|
||||
spawnOnce "syncthing"
|
||||
-- spawnOnce "lxsession"
|
||||
-- spawnOnce "picom"
|
||||
-- spawnOnce "clipmenud"
|
||||
spawnOnce "lxsession"
|
||||
spawnOnce "picom"
|
||||
spawnOnce "clipmenud"
|
||||
spawnOnce "dunst"
|
||||
-- spawnOnce "discord --start-minimized"
|
||||
spawnOnce "keepassxc"
|
||||
spawnOnce "/usr/libexec/polkit-gnome-authentication-agent-1"
|
||||
spawn ("sleep 2 && trayer-srg --edge top --align right --widthtype request --padding 6 --iconspacing 7 --SetDockType true --SetPartialStrut true --expand true --monitor 1 --transparent true --alpha 0 --tint 0x303446 --height 27 -l")
|
||||
setWMName "LG3D" -- Fix java programs
|
||||
|
||||
|
@ -99,6 +100,7 @@ myScratchPads :: [NamedScratchpad]
|
|||
myScratchPads = [ NS "terminal" spawnTerm findTerm manageTerm
|
||||
, NS "wiki" spawnWiki findWiki manageWiki
|
||||
, NS "notes" spawnNotes findNotes manageNotes
|
||||
, NS "profanity" spawnProfanity findProfanity manageProfanity
|
||||
]
|
||||
where
|
||||
spawnTerm = myTerminal ++ " --class scratchpad,scratchpad"
|
||||
|
@ -109,7 +111,7 @@ myScratchPads = [ NS "terminal" spawnTerm findTerm manageTerm
|
|||
w = 0.8
|
||||
t = 0.9 -h
|
||||
l = 0.9 -w
|
||||
spawnWiki = myTerminal ++ " -class wiki,wiki -e wiki"
|
||||
spawnWiki = myTerminal ++ " --class wiki,wiki -e wiki"
|
||||
findWiki = className =? "wiki"
|
||||
manageWiki = customFloating $ W.RationalRect l t w h
|
||||
where
|
||||
|
@ -117,7 +119,7 @@ myScratchPads = [ NS "terminal" spawnTerm findTerm manageTerm
|
|||
w = 0.8
|
||||
t = 0.9 -h
|
||||
l = 0.9 -w
|
||||
spawnNotes = myTerminal ++ " -class wiki,wiki -e notes"
|
||||
spawnNotes = myTerminal ++ " --class wiki,wiki -e notes"
|
||||
findNotes = className =? "notes"
|
||||
manageNotes = customFloating $ W.RationalRect l t w h
|
||||
where
|
||||
|
@ -125,6 +127,15 @@ myScratchPads = [ NS "terminal" spawnTerm findTerm manageTerm
|
|||
w = 0.8
|
||||
t = 0.9 -h
|
||||
l = 0.9 -w
|
||||
spawnProfanity = myTerminal ++ " --class profanity,profanity -e profanity"
|
||||
findProfanity = className =? "profanity"
|
||||
manageProfanity = customFloating $ W.RationalRect l t w h
|
||||
where
|
||||
h = 0.8
|
||||
w = 0.8
|
||||
t = 0.9 -h
|
||||
l = 0.9 -w
|
||||
|
||||
|
||||
--Makes setting the spacingRaw simpler to write. The spacingRaw module adds a configurable amount of space around windows.
|
||||
mySpacing :: Integer -> l a -> XMonad.Layout.LayoutModifier.ModifiedLayout Spacing l a
|
||||
|
@ -139,11 +150,11 @@ mySpacing' i = spacingRaw True (Border i i i i) True (Border i i i i) True
|
|||
tall = renamed [Replace "tall"]
|
||||
$ withBorder myBorderWidth
|
||||
$ windowNavigation
|
||||
$ mySpacing 6
|
||||
$ mySpacing 7
|
||||
$ ResizableTall 1 (3/100) (1/2) []
|
||||
monocle = renamed [Replace "monocle"]
|
||||
$ withBorder myBorderWidth
|
||||
$ mySpacing 6
|
||||
$ mySpacing 7
|
||||
$ windowNavigation
|
||||
$ Full
|
||||
floats = renamed [Replace "floats"]
|
||||
|
@ -164,7 +175,7 @@ myLayoutHook = lessBorders OnlyScreenFloat
|
|||
-- My manage hook
|
||||
myManageHook :: ManageHook
|
||||
myManageHook = composeAll
|
||||
[ className =? "LibreWolf" --> doShiftAndGo ( myWorkspaces !! 0)
|
||||
[ className =? "librewolf" --> doShiftAndGo ( myWorkspaces !! 0)
|
||||
, className =? "newsboat" --> doShiftAndGo ( myWorkspaces !! 3)
|
||||
, className =? "videos" --> doShiftAndGo ( myWorkspaces !! 3)
|
||||
, className =? "ytfzf" --> doShiftAndGo ( myWorkspaces !! 3)
|
||||
|
@ -173,22 +184,23 @@ myManageHook = composeAll
|
|||
, className =? "Ferdium" --> doShiftAndGo ( myWorkspaces !! 4)
|
||||
, className =? "discord" --> doShiftAndGo ( myWorkspaces !! 4)
|
||||
, className =? "tutanota-desktop" --> doShiftAndGo ( myWorkspaces !! 4)
|
||||
, className =? "Lutris" --> doShiftAndGo ( myWorkspaces !! 5) <+> doF W.swapUp
|
||||
, className =? "Steam" --> doShiftAndGo ( myWorkspaces !! 5)
|
||||
, className =? "Lutris" --> doShiftAndGo ( myWorkspaces !! 5)
|
||||
, className =? "steam" --> doShiftAndGo ( myWorkspaces !! 5)
|
||||
, className =? "heroic" --> doShiftAndGo ( myWorkspaces !! 5)
|
||||
, className =? "cartridges" --> doShiftAndGo ( myWorkspaces !! 5)
|
||||
, isDialog --> doCenterFloat <+> doF W.swapUp
|
||||
, className =? "Gimp" --> doFloat
|
||||
, className =? "confirm" --> doFloat
|
||||
, className =? "file_progress" --> doFloat
|
||||
, className =? "dialog" --> doFloat
|
||||
, className =? "download" --> doFloat
|
||||
, className =? "error" --> doFloat
|
||||
, className =? "notification" --> doFloat
|
||||
, className =? "splash" --> doFloat
|
||||
, className =? "toolbar" --> doFloat
|
||||
, className =? "pinentry-gtk-2" --> doFloat
|
||||
, className =? "Yad" --> doCenterFloat
|
||||
, className =? "badd" --> doCenterFloat
|
||||
, className =? "Gimp" --> doFloat <+> doF W.swapUp
|
||||
, className =? "confirm" --> doFloat <+> doF W.swapUp
|
||||
, className =? "file_progress" --> doFloat <+> doF W.swapUp
|
||||
, className =? "dialog" --> doFloat <+> doF W.swapUp
|
||||
, className =? "download" --> doFloat <+> doF W.swapUp
|
||||
, className =? "error" --> doFloat <+> doF W.swapUp
|
||||
, className =? "notification" --> doFloat <+> doF W.swapUp
|
||||
, className =? "splash" --> doFloat <+> doF W.swapUp
|
||||
, className =? "toolbar" --> doFloat <+> doF W.swapUp
|
||||
, className =? "pinentry-gtk-2" --> doFloat <+> doF W.swapUp
|
||||
, className =? "Yad" --> doCenterFloat <+> doF W.swapUp
|
||||
, className =? "badd" --> doCenterFloat <+> doF W.swapUp
|
||||
, isFullscreen --> doFullFloat <+> doF W.swapUp
|
||||
, namedScratchpadManageHook myScratchPads
|
||||
]
|
||||
|
@ -215,6 +227,7 @@ myKeys = \c -> mkKeymap c $
|
|||
, ("M-s t", namedScratchpadAction myScratchPads "terminal") -- Toggle scratchpad
|
||||
, ("M-s w", namedScratchpadAction myScratchPads "wiki") -- Toggle scratchpad
|
||||
, ("M-s n", namedScratchpadAction myScratchPads "notes") -- Toggle scratchpad
|
||||
, ("M-s p", namedScratchpadAction myScratchPads "profanity") -- Toggle scratchpad
|
||||
, ("M-1", viewDesktop 0) -- Check workspace 1
|
||||
, ("M-2", viewDesktop 1) -- Check workspace 2
|
||||
, ("M-3", viewDesktop 2) -- Check workspace 3
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue