scsh-conservatory
/
orion-wm
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix of window-contains-focus? for non existent windows

This commit is contained in:
frese 2003-04-17 14:16:45 +00:00
parent 7a8a3c977d
commit 68e7a41372
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/utils.scm
View File

@ -280,7 +280,7 @@
(or (window-focused? dpy window) (or (window-focused? dpy window)
(any (lambda (child) (any (lambda (child)
(window-contains-focus? dpy child)) (window-contains-focus? dpy child))
(window-children dpy window)))) (or (window-children dpy window) '()))))
(define (take-focus dpy window time) (define (take-focus dpy window time)
;; implements the TAKE_FOCUS protocol ;; implements the TAKE_FOCUS protocol