ui.backend.cocoa.views: handle windowDidChangeBackingProperties event.
parent
124a9a3417
commit
5512294075
|
@ -390,6 +390,17 @@ CLASS: FactorWindowDelegate < NSObject
|
||||||
notification -> object -> contentView
|
notification -> object -> contentView
|
||||||
[ window ungraft ] [ unregister-window ] bi
|
[ window ungraft ] [ unregister-window ] bi
|
||||||
]
|
]
|
||||||
|
|
||||||
|
METHOD: void windowDidChangeBackingProperties: id notification
|
||||||
|
[
|
||||||
|
|
||||||
|
notification -> object dup SEL: backingScaleFactor
|
||||||
|
-> respondsToSelector: c-bool> [
|
||||||
|
SEND: backingScaleFactor execute( x x -- x )
|
||||||
|
[ gl-scale-factor set-global ]
|
||||||
|
[ 1.0 > retina? set-global ] bi
|
||||||
|
] [ drop ] if
|
||||||
|
]
|
||||||
]
|
]
|
||||||
|
|
||||||
: install-window-delegate ( window -- )
|
: install-window-delegate ( window -- )
|
||||||
|
|
Loading…
Reference in New Issue