diff options
| -rw-r--r-- | starling/gui.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/starling/gui.scm b/starling/gui.scm index 4698923..3a93f36 100644 --- a/starling/gui.scm +++ b/starling/gui.scm @@ -303,9 +303,9 @@ (define-method (pick-widget (scene <gui-scene>) p) (pick scene p (lambda (node) - (and (enabled? node) - (visible? node) - (is-a? node <widget>))))) + (and (visible? node) + (is-a? node <widget>) + (enabled? node))))) (define-method (on-mouse-move (scene <gui-scene>) x y x-rel y-rel buttons) (let ((focused (mouse-focus scene)) |