aboutsummaryrefslogtreecommitdiff
path: root/XMonad/xmonad.hs
diff options
context:
space:
mode:
authorVidhu Kant Sharma <bokuwakanojogahoshii@yahoo.com>2021-02-18 21:25:54 +0530
committerVidhu Kant Sharma <bokuwakanojogahoshii@yahoo.com>2021-02-18 21:25:54 +0530
commitaa1e80d0113585a8b63c2c2181848150351616ed (patch)
treedfa68380be50e0ec07e024a65776358185e2a752 /XMonad/xmonad.hs
parentbd12394a8a719b09fb5730ca81db0ee68d9014c8 (diff)
played around with XMonad TreeSelect
Diffstat (limited to 'XMonad/xmonad.hs')
-rw-r--r--XMonad/xmonad.hs31
1 files changed, 28 insertions, 3 deletions
diff --git a/XMonad/xmonad.hs b/XMonad/xmonad.hs
index 3092b7da..c6724517 100644
--- a/XMonad/xmonad.hs
+++ b/XMonad/xmonad.hs
@@ -173,11 +173,35 @@ myTSConfig = TS.TSConfig { TS.ts_hidechildren = False
myPowerMenu :: TS.TSConfig (X ()) -> X ()
myPowerMenu a = TS.treeselectAction a
- [Node (TS.TSNode "SHUTDOWN" "It's not like I'm gonna miss you, b- baka!" (spawn "xmessage bye!")) []
- , Node (TS.TSNode "REBOOT" "Be quick, okay?" (spawn "st")) []
+ [Node (TS.TSNode "SHUTDOWN" "It's not like I'm gonna miss you, b- baka!" (spawn "shutdown now")) []
+ , Node (TS.TSNode "REBOOT" "Be quick, okay?" (spawn "reboot")) []
, Node (TS.TSNode "CANCEL" "Do nothing" (return ())) []
]
+myTreeMenu :: TS.TSConfig (X ()) -> X ()
+myTreeMenu a = TS.treeselectAction a
+ [ Node (TS.TSNode "Section Screenshot" "Take screenshot of a section on the screen" (spawn "scrot -s /zt/Screenshots/Screenshot-%Y-%d-%m--%T.png")) []
+ , Node (TS.TSNode "Terminals" "Launch terminals for various tasks" (return()))
+ [ Node (TS.TSNode "Web dev" "for websites" (return()))
+ [ Node (TS.TSNode "KE-Site" "Kalawati Enterprises Site" (spawn "launch_terminals_ke-site")) []
+ ]
+ ]
+ , Node (TS.TSNode "GUI Apps" "Shitty apps that require a mouse" (return()))
+ [ Node (TS.TSNode "Torrents" "" (spawn "qbittorrent")) []
+ , Node (TS.TSNode "Pavucontrol" "" (spawn "Pavucontrol")) []
+ , Node (TS.TSNode "Discord" "" (spawn "discord-canary")) []
+ , Node (TS.TSNode "LibreOffice" "" (spawn "libreoffice")) []
+ , Node (TS.TSNode "Vivaldi" "" (spawn "vivaldi-stable")) []
+ , Node (TS.TSNode "Firefox" "" (spawn "firefox")) []
+ ]
+ , Node (TS.TSNode "Terminal Apps" "Command line apps" (return()))
+ [ Node (TS.TSNode "Htop" "" (spawn "st -e htop")) []
+ , Node (TS.TSNode "Bashtop" "" (spawn "st -e bashtop")) []
+ , Node (TS.TSNode "Ranger" "" (spawn "st -e ranger")) []
+ ]
+ ]
+
+
-- scratchpad config
myScratchpads = [
@@ -200,7 +224,8 @@ myKeys = [
, ((myModMask, xK_a), withFocused $ windows . W.sink) -- unfloat windows
-- TreeSelect
- , ((mod1Mask, xK_F4), myPowerMenu myTSConfig)
+ , ((altMask, xK_F4), myPowerMenu myTSConfig)
+ , ((myModMask, xK_n), myTreeMenu myTSConfig)
-- launch apps/execute scripts
-- , ((myModMask, xK_i), spawn (myBrowser))