From e9849939549010529e180ffb2509922f1bcc4843 Mon Sep 17 00:00:00 2001 From: Po Lu Date: Fri, 8 Apr 2022 12:11:24 +0800 Subject: [PATCH] * lisp/term/x-win.el (x-device-class): Detect more keyboards. --- lisp/term/x-win.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index d10d8d1dbdc..4c6fcc904c0 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -1616,7 +1616,11 @@ Users should not call this function; see `device-class' instead." ((string-match-p "touchpad" downcased-name) 'touchpad) ((or (string-match-p "midi" downcased-name) (string-match-p "piano" downcased-name)) - 'piano)))) + 'piano) + ((or (string-match-p "wskbd" downcased-name) ; NetBSD/OpenBSD + (and (string-match-p "/dev" downcased-name) + (string-match-p "kbd" downcased-name))) + 'keyboard)))) (setq x-dnd-movement-function #'x-dnd-movement) (setq x-dnd-unsupported-drop-function #'x-dnd-handle-unsupported-drop) -- 2.39.5