has-focus? in window<%>

Indicates whether the window currently has the keyboard focus. See also on-focus.

• (send a-window has-focus?) -> boolean