We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 1e5053b commit ecac746Copy full SHA for ecac746
gui-lib/mred/private/wx/cocoa/procs.rkt
@@ -198,10 +198,10 @@
198
#:keep keep))
199
(void/reference-sink keep)
200
ans]
201
- [(version-10.6-or-later?)
+ [(version-10.7-or-later?)
202
(tell (get) colorUsingColorSpace: (tell NSColorSpace deviceRGBColorSpace))]
203
[else
204
- ;; In 10.5, `colorUsingColorSpace:` with (tell NSColorSpace deviceRGBColorSpace)`
+ ;; In 10.6 and earlier, `colorUsingColorSpace:` with (tell NSColorSpace deviceRGBColorSpace)`
205
;; doesn't produce a color with RGB components
206
(tell (get) colorUsingColorSpaceName: #:type _NSString "NSDeviceRGBColorSpace")])))
207
(define (as-color v)
0 commit comments