@@ -55,26 +55,28 @@ shiftWindow dir
55
55
emacsKeys :: [(String , X () )]
56
56
emacsKeys = [
57
57
------------------------------- Programs ----------------------------------------
58
- -- ("M-S-m" , spawn "ulauncher") -- already built into ulauncher
59
58
(" C-M1-S-f" , spawn " firefox-developer-edition" )
60
59
, (" C-M1-a" , spawn " atom" )
60
+ , (" C-M1-b" , spawn " blueberry" )
61
61
, (" C-M1-c" , spawn " calibre" )
62
62
, (" C-M1-e" , spawn " emacs" )
63
63
, (" C-M1-f" , spawn " firefox" )
64
- , (" C-M1-g" , spawn " geogebra" )
65
- , (" C-M1-i" , spawn " idea" )
64
+ , (" C-M1-g" , spawn " gimp" )
66
65
, (" C-M1-k" , spawn " anki" )
67
- , (" C-M1-n" , spawn " nautilus" )
66
+ , (" C-M1-i" , spawn " idea-ce" )
67
+ , (" C-M1-n" , spawn " nautilus" )
68
+ , (" C-M1-m" , spawn " thunderbird" )
68
69
-- Isn't Alt+= the align code
69
70
-- , ("C-M1-l" , spawn "libreoffice" ) -- conflict with intellij align code
70
- , (" C-M1-p" , spawn " $HOME/Code/tools/Pycharm2019/pycharm-2019.3.4/bin/pycharm.sh" )
71
- , (" C-M1-r" , spawn " rstudio-bin" )
72
- , (" C-M1-t" , spawn " alacritty" )
73
- , (" C-M1-v" , spawn " virtualbox" )
71
+ -- , ("C-M1-p" , spawn "$HOME/Code/tools/Pycharm2019/pycharm-2019.3.4/bin/pycharm.sh" )
72
+ , (" C-M1-v" , spawn " code" ) -- vscode
73
+ , (" C-M1-r" , spawn " rstudio-bin" )
74
+ , (" C-M1-t" , spawn " xterm" )
75
+ , (" C-M1-w" , spawn " nxplayer" )
74
76
75
77
------------------------------- Scratchpads ----------------------------------------
76
78
, (" C-M-<Space>" , scratchpadAction exclusiveSps " xterm" )
77
- , (" C-M-b" , scratchpadAction exclusiveSps " todoist " ) -- b
79
+ , (" C-M-b" , scratchpadAction exclusiveSps " blueberry " ) -- b
78
80
, (" C-M-c" , scratchpadAction exclusiveSps " cal" ) -- [c]alendar
79
81
, (" C-M-d" , scratchpadAction exclusiveSps " stardict" ) -- [d]ictionary
80
82
, (" C-M-e" , scratchpadAction exclusiveSps " virt-manager" ) -- [e]mulator
@@ -144,8 +146,8 @@ emacsKeys = [
144
146
, (" <XF86AudioNext>" , spawn " xterm" )
145
147
, (" <XF86AudioPlay>" , spawn " cplay" )
146
148
, (" <XF86AudioMute>" , spawn " pulsemixer --toggle-mute" )
147
- , (" <XF86AudioLowerVolume>" , spawn " pulsemixer --change-volume -15 " )
148
- , (" <XF86AudioRaiseVolume>" , spawn " pulsemixer --change-volume +15 " )
149
+ , (" <XF86AudioLowerVolume>" , spawn " pulsemixer --change-volume -10 " )
150
+ , (" <XF86AudioRaiseVolume>" , spawn " pulsemixer --change-volume +10 " )
149
151
150
152
------------------------------- Yeelight ----------------------------------------
151
153
-- TODO: scripts use directory structure
@@ -180,7 +182,7 @@ exclusiveSps = mkXScratchpads [
180
182
, (" anki" , " anki" , resource =? " anki" )
181
183
, (" cal" , " google-calendar-nativefier" , resource =? " googlecalendar-nativefier-e22938" )
182
184
, (" cmus" , " xterm -name cmus cmus" , resource =? " cmus" )
183
- , (" thunderbird" , " thunderbird" , resource =? " Mail" )
185
+ -- , ("thunderbird" , "thunderbird", resource =? "Mail")
184
186
, (" nvtop" , " xterm -name nvtop nvtop" , resource =? " nvtop" )
185
187
, (" htop" , " xterm -bg black -name htop htop" , resource =? " htop" )
186
188
, (" hardinfo" , " hardinfo" , resource =? " hardinfo" )
@@ -210,8 +212,11 @@ shiftMouse direction
210
212
211
213
mouseKeys :: [((ButtonMask , Button ), Window -> X () )]
212
214
mouseKeys = [
213
- ((0 , 6 ), \ w -> moveToIndependent Prev )
215
+ -- button4 = scroll up, button3 = right click, button 5 = scroll down
216
+ ((0 , 6 ), \ w -> moveToIndependent Prev )
217
+ -- , ((0, button3), \w -> spawn "exec xdotool key ctrl+return")
214
218
, ((0 , 7 ), \ w -> moveToIndependent Next )
219
+ -- Middle mouse button: annotate label (0, 3) or button2
215
220
, ((mod4Mask, button2), (\ w -> focus w >> mouseResizeWindow w >> windows W. shiftMaster))
216
221
]
217
222
0 commit comments