diff --git a/basis/ui/backend/cocoa/cocoa.factor b/basis/ui/backend/cocoa/cocoa.factor index 55b3433192..94a104ee5e 100644 --- a/basis/ui/backend/cocoa/cocoa.factor +++ b/basis/ui/backend/cocoa/cocoa.factor @@ -144,7 +144,7 @@ M:: cocoa-ui-backend (open-window) ( world -- ) window install-window-delegate view window world handle<< window f -> makeKeyAndOrderFront: - 100 window active?<< ; + 100 world active?<< ; M: cocoa-ui-backend (close-window) ( handle -- ) [