safer not on os x
This commit is contained in:
parent
2451513a85
commit
aec21053f7
|
@ -87,8 +87,8 @@
|
||||||
icon
|
icon
|
||||||
(read-bitmap icon)))
|
(read-bitmap icon)))
|
||||||
(when (eq? 'macosx (system-type 'os))
|
(when (eq? 'macosx (system-type 'os))
|
||||||
(local-require drracket/private/dock-icon)
|
((dynamic-require 'drracket/private/dock-icon 'set-dock-tile-bitmap)
|
||||||
(set-dock-tile-bitmap icon-bm)))
|
icon-bm)))
|
||||||
|
|
||||||
(define depth-box (box 0))
|
(define depth-box (box 0))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue