ui.backend.cocoa.views: Use ?-> to avoid objc lookup errors if backingScaleFactor...

diff --git a/basis/ui/backend/cocoa/views/views.factor b/basis/ui/backend/cocoa/views/views.factor
index a854e3fe57a53a8be96bdf1558c67ca0978c7d7f..a5b1dd431324e4aa4518283b7d8d630a45028911 100644 (file)
--- a/basis/ui/backend/cocoa/views/views.factor
+++ b/basis/ui/backend/cocoa/views/views.factor
@@ -438,9 +438,7 @@ CLASS: FactorWindowDelegate < NSObject
 
         notification -> object dup SEL: backingScaleFactor
         -> respondsToSelector: c-bool> [
-
-            SEL: backingScaleFactor
-            double f "objc_msgSend" { id SEL } f alien-invoke
+            { double { id SEL } } ?-> backingScaleFactor
 
             [ [ 1.0 > ] keep f ? gl-scale-factor set-global ]
             [ 1.0 > retina? set-global ] bi