diff --git a/collects/mred/private/wx/cocoa/canvas.rkt b/collects/mred/private/wx/cocoa/canvas.rkt index e023ebe7..434c113d 100644 --- a/collects/mred/private/wx/cocoa/canvas.rkt +++ b/collects/mred/private/wx/cocoa/canvas.rkt @@ -4,7 +4,8 @@ racket/class racket/draw racket/draw/private/gl-context - (except-in racket/draw/private/color color%) + (except-in racket/draw/private/color + color% make-immutable-color) (only-in racket/draw/private/bitmap quartz-bitmap%) "pool.rkt" "utils.rkt" diff --git a/collects/mred/private/wx/gtk/canvas.rkt b/collects/mred/private/wx/gtk/canvas.rkt index fc8b44ff..80adf564 100644 --- a/collects/mred/private/wx/gtk/canvas.rkt +++ b/collects/mred/private/wx/gtk/canvas.rkt @@ -3,7 +3,8 @@ racket/class racket/draw ffi/unsafe/alloc - (except-in racket/draw/private/color color%) + (except-in racket/draw/private/color + color% make-immutable-color) racket/draw/private/local "../common/backing-dc.rkt" "../common/canvas-mixin.rkt"