Fix odd race condition in ui.backend.cocoa
parent
713ab02337
commit
370e90f57b
|
@ -70,8 +70,8 @@ M:: cocoa-ui-backend (open-window) ( world -- )
|
|||
world dim>> <FactorView> :> view
|
||||
view world world>NSRect <ViewWindow> :> window
|
||||
view -> release
|
||||
window world window-loc>> auto-position
|
||||
world view register-window
|
||||
window world window-loc>> auto-position
|
||||
world window save-position
|
||||
window install-window-delegate
|
||||
view window <window-handle> world (>>handle)
|
||||
|
|
|
@ -336,7 +336,7 @@ CLASS: {
|
|||
|
||||
! Initialization
|
||||
{ "updateFactorGadgetSize:" "void" { "id" "SEL" "id" }
|
||||
[ 2drop dup view-dim swap window (>>dim) yield ]
|
||||
[ 2drop [ window ] [ view-dim ] bi >>dim drop yield ]
|
||||
}
|
||||
|
||||
{ "doCommandBySelector:" "void" { "id" "SEL" "SEL" }
|
||||
|
|
Loading…
Reference in New Issue