aboutsummaryrefslogtreecommitdiff
path: root/XMonad/xmonad.hs
diff options
context:
space:
mode:
authorVidhu Kant Sharma <bokuwakanojogahoshii@yahoo.com>2021-02-17 19:15:17 +0530
committerVidhu Kant Sharma <bokuwakanojogahoshii@yahoo.com>2021-02-17 19:15:17 +0530
commit69def2cceced0f59ab977f71d05a0c101c05b991 (patch)
treee412253092df15b85316499654e39531a0a13e7f /XMonad/xmonad.hs
parent0941b7f891129cfcbeee71dc6c063c74f418de50 (diff)
added window copying functions
Diffstat (limited to 'XMonad/xmonad.hs')
-rw-r--r--XMonad/xmonad.hs21
1 files changed, 12 insertions, 9 deletions
diff --git a/XMonad/xmonad.hs b/XMonad/xmonad.hs
index 10a7f972..3a8e6e1f 100644
--- a/XMonad/xmonad.hs
+++ b/XMonad/xmonad.hs
@@ -47,10 +47,10 @@ import XMonad.Util.NamedScratchpad
myStartupHook :: X ()
myStartupHook = do
spawnOnce "/home/zt/.xmonad/baraction | lemonbar -b -g 500x21+800+0 -B '#171520' -F '#ffffff' -f 'Source Han Sans JP:size=10'"
- spawnOnce "nitrogen --restore"
- spawnOnce "startpage-server"
- spawnOnce "picom"
- spawnOnce "deadd-notification-center"
+-- spawnOnce "nitrogen --restore"
+-- spawnOnce "startpage-server"
+-- spawnOnce "picom"
+-- spawnOnce "deadd-notification-center"
spawnOnce "brave"
-- spawnOnce "sleep 3; trayer --align center --edge top --width 20 --height 21 --expand true --distance 90 --distancefrom right --tint 0x171520 --transparent true --alpha 0 --iconspacing 8"
setWMName "Oppai"
@@ -234,11 +234,14 @@ myKeys = [
] ++ [ -- to swap workspaces
((mod1Mask .|. shiftMask, k), windows $ swapWithCurrent i)
| (i, k) <- zip myWorkspaces [xK_1 ..]
- ] -- ++ [
--- ((m .|. myModMask, k), windows $ f i)
--- | (i, k) <- zip (myWorkspaces x) [xK_1 ..]
--- , (f, m) <- [(copy, shiftMask .|. controlMask)]
--- ]
+ ] ++ [ -- copy
+ ((m .|. myModMask, k), windows $ f i)
+ | (i, k) <- zip (myWorkspaces) [xK_1 ..]
+ , (f, m) <- [(copy, shiftMask .|. altMask)]
+ ] ++ [ -- sticky-ing windows
+ ((myModMask, xK_v), windows copyToAll) -- make window visible on all screens
+ , ((myModMask .|. shiftMask, xK_v), killAllOtherCopies)
+ ]