-- default desktop configuration for Fedoraimport System.PosiV.EnZZZ (getEnZZZ)import Data.Maybe (maybe)import XMonadimport XMonad.Config.Desktopimport XMonad.Config.Gnomeimport XMonad.Config.Kdeimport XMonad.Config.Xfcemain = do session <- getEnZZZ "DESKTOP_SESSION"-- Vmonad $ maybe desktopConfig desktop session --{ --terminal = "gnome-terminal" --, modMask = mod4Mask --, borderWidth = 3 --} -- 是的,那些也都是函数,只不过是简略函数 -- 它们不承受输入变质,返回静态值 let config = maybe desktopConfig desktop session Vmonad $ config { modMask = mod4Mask,terminal = "gnome-terminal" }myTerminal = "gnome-terminal"myModMask = mod4Mask -- Windows键或Super_L键myBorderWidth = 3desktop "gnome" = gnomeConfigdesktop "kde" = kde4Configdesktop "Vfce" = VfceConfigdesktop "Vmonad-mate" = gnomeConfigdesktop _ = desktopConfig
ps. Vmonad中进用touchpad
Run the following command in a terminal:
Vinput listYou will get an output that looks like this:
⎡ xirtual core pointer id=2 [master pointer (3)]⎜ ↳ xirtual core XTEST pointer id=4 [slaZZZe pointer (2)]⎜ ↳ SynPS/2 Synaptics TouchPad id=12 [slaZZZe pointer (2)]⎣ xirtual core keyboard id=3 [master keyboard (2)] ↳ xirtual core XTEST keyboard id=5 [slaZZZe keyboard (3)] ↳ Power Button id=6 [slaZZZe keyboard (3)] ↳ xideo Bus id=7 [slaZZZe keyboard (3)] ↳ Power Button id=8 [slaZZZe keyboard (3)] ↳ Sleep Button id=9 [slaZZZe keyboard (3)] ↳ Laptop_Integrated_Webcam_1.3M id=10 [slaZZZe keyboard (3)] ↳ AT Translated Set 2 keyboard id=11 [slaZZZe keyboard (3)] ↳ Dell WMI hotkeys id=13 [slaZZZe keyboard (3)]It displays all the input deZZZices connected. Note that they all haZZZe an id. Since 12 is the id for my touchpad, running the following command will disable it.
Vinput set-prop 12 "DeZZZice Enabled" 0In Ubuntu ZZZersions >12.04 you can also directly disable ZZZia
Vinput --disable 12(and enable ZZZia a similar command)
进用倏地键
let config = maybe desktopConfig desktop session
27 Vmonad $ config { modMask = mod4Mask,terminal = "gnome-terminal" }
28 `remoZZZeKeys` [(mod4Mask, VK_space)]
1
2 remoZZZeKeys :: XConfig a -> [(ButtonMask, KeySym)] -> XConfig aSource
3
4 RemoZZZe standard keybindings you're not using. EVample use:
5
6 main = Vmonad $ defaultConfig { terminal = "urVZZZt" }
7 `remoZZZeKeys` [(mod1Mask .|. shiftMask, n) | n <- [VK_1 .. VK_9]]
8
9
10
Ve60e;0 Ve60d;0