safer not on os x

2014-11-23 13:57:04 -05:00 · 2014-11-23 13:57:04 -05:00 · aec21053f7
parent 2451513a85
commit aec21053f7
1 changed files with 2 additions and 2 deletions
--- a/chaos/gui.rkt
+++ b/chaos/gui.rkt
@ -87,8 +87,8 @@
          icon
          (read-bitmap icon)))
    (when (eq? 'macosx (system-type 'os))
-      (local-require drracket/private/dock-icon)
-      (set-dock-tile-bitmap icon-bm)))
+      ((dynamic-require 'drracket/private/dock-icon 'set-dock-tile-bitmap)
+       icon-bm)))

  (define depth-box (box 0))