procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/term/x-win.el (x-device-class): Detect "USB USB Keykoard"s.

Browse source
This commit is contained in:
Po Lu 2022-04-08 11:03:27 +08:00
parent 1a1c5a6884
commit 598d1a2aa3
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/term/x-win.el
View file

@ -1608,7 +1608,10 @@ Users should not call this function; see `device-class' instead."
(string-match-p "pointer" downcased-name))
'mouse)
((string-match-p "cursor" downcased-name) 'puck)
((string-match-p "keyboard" downcased-name) 'keyboard)
((or (string-match-p "keyboard" downcased-name)
;; One of my cheap keyboards is really named this...
(string= name "USB USB Keykoard"))
'keyboard)
((string-match-p "button" downcased-name) 'power-button)
((string-match-p "touchpad" downcased-name) 'touchpad)
((or (string-match-p "midi" downcased-name)