York Zhao
2018-04-13 04:47:39 UTC
Hi List,
I would like to be able to toggle keyboard layout between DWERT and DVORAK
by pressing both left and right SHIFT keys. I've already written the
following command to do this. However, I'm not sure how to bind this
command to pressing both SHIFT in Stumpwm.
(defcommand set-kbd-layout (layout) ()
"Set keyboard layout"
(setf layout (cdr (assoc layout '(("qwert" . "qwert")
("dvorak" . "dvorak,"))
:test 'equal)))
(when layout
(run-shell-command (concatenate 'string "setxkbmap -variant " layout))))
Thanks,
I would like to be able to toggle keyboard layout between DWERT and DVORAK
by pressing both left and right SHIFT keys. I've already written the
following command to do this. However, I'm not sure how to bind this
command to pressing both SHIFT in Stumpwm.
(defcommand set-kbd-layout (layout) ()
"Set keyboard layout"
(setf layout (cdr (assoc layout '(("qwert" . "qwert")
("dvorak" . "dvorak,"))
:test 'equal)))
(when layout
(run-shell-command (concatenate 'string "setxkbmap -variant " layout))))
Thanks,