diff --git a/collects/mred/private/wx/gtk/canvas.rkt b/collects/mred/private/wx/gtk/canvas.rkt index 9730682d..96a13b69 100644 --- a/collects/mred/private/wx/gtk/canvas.rkt +++ b/collects/mred/private/wx/gtk/canvas.rkt @@ -329,7 +329,7 @@ (define/public (get-dc) dc) (define/public (make-compatible-bitmap w h) - (send dc make-backing-bitmap w h #t)) + (send dc make-backing-bitmap w h)) (define/override (get-client-gtk) client-gtk) (define/override (handles-events? gtk) (not (ptr-equal? gtk combo-button-gtk))) diff --git a/collects/mred/private/wx/gtk/dc.rkt b/collects/mred/private/wx/gtk/dc.rkt index 46c1c0c3..01a141a2 100644 --- a/collects/mred/private/wx/gtk/dc.rkt +++ b/collects/mred/private/wx/gtk/dc.rkt @@ -38,6 +38,7 @@ (define/override (ok?) #t) (define/override (is-color?) #t) + (define/override (has-alpha-channel?) #f) (define/override (get-cairo-surface) s) @@ -80,15 +81,13 @@ (super-new) - (define/override (make-backing-bitmap w h [any-bg? #f]) + (define/override (make-backing-bitmap w h) (cond [(and (eq? 'unix (system-type)) - (or any-bg? - (send canvas get-canvas-background))) + (send canvas get-canvas-background)) (make-object x11-bitmap% w h (widget-window (send canvas get-client-gtk)))] [(and (eq? 'windows (system-type)) - (or any-bg? - (send canvas get-canvas-background))) + (send canvas get-canvas-background)) (make-object win32-bitmap% w h (widget-window (send canvas get-client-gtk)))] [else (super make-backing-bitmap w h)])) diff --git a/collects/scribblings/gui/miscwin-funcs.scrbl b/collects/scribblings/gui/miscwin-funcs.scrbl index 2419d8d6..bcd3e71d 100644 --- a/collects/scribblings/gui/miscwin-funcs.scrbl +++ b/collects/scribblings/gui/miscwin-funcs.scrbl @@ -294,8 +294,7 @@ environment of the result namespace.} (is-a/c? bitmap%)]{ Creates a bitmap that draws in a way that is the same as drawing to a -canvas in its default configuration. The bitmap is always in color -with an alpha channel. +canvas in its default configuration. A normal @racket[bitmap%] draws in a more platform-independent way and may use fewer constrained resources, particularly under Windows.}