- grabbing the keyboard for the dialog-box now disables other
shortcuts while the dialog-box is opened.
This commit is contained in:
parent
fb318e3617
commit
328ddca7b0
|
@ -59,10 +59,13 @@
|
|||
dpy window (event-mask exposure key-press)
|
||||
(lambda (event-channel)
|
||||
(map-window dpy window)
|
||||
(grab-keyboard dpy window #f (grab-mode async) (grab-mode async)
|
||||
current-time)
|
||||
(set-input-focus dpy window (revert-to parent) current-time)
|
||||
(let* ((gc (create-gc dpy window (make-gc-value-alist)))
|
||||
(result (do-input dpy parent question answers complete need-edit?
|
||||
window gc options event-channel)))
|
||||
(ungrab-keyboard dpy current-time)
|
||||
(free-gc dpy gc)
|
||||
(destroy-window dpy window)
|
||||
result)))))
|
||||
|
|
Loading…
Reference in New Issue