cocoa: windows -> ui-windows
parent
2451fea0a1
commit
fb8d601c20
|
@ -85,8 +85,8 @@ M: pasteboard set-clipboard-contents
|
||||||
#! after register-window.
|
#! after register-window.
|
||||||
dup { 0 0 } = [
|
dup { 0 0 } = [
|
||||||
drop
|
drop
|
||||||
windows get-global length 1 <= [ -> center ] [
|
ui-windows get-global length 1 <= [ -> center ] [
|
||||||
windows get-global last second window-loc>>
|
ui-windows get-global last second window-loc>>
|
||||||
dupd first2 <CGPoint> -> cascadeTopLeftFromPoint:
|
dupd first2 <CGPoint> -> cascadeTopLeftFromPoint:
|
||||||
-> setFrameTopLeftPoint:
|
-> setFrameTopLeftPoint:
|
||||||
] if
|
] if
|
||||||
|
|
Loading…
Reference in New Issue