fix `erase' on a monochrome bitmap

Closes PR 11615
This commit is contained in:
Matthew Flatt 2011-01-13 08:02:09 -07:00
parent 0d72df472f
commit a57fb5bf9f

View File

@ -84,7 +84,7 @@
(define/override (collapse-bitmap-b&w?) b&w?) (define/override (collapse-bitmap-b&w?) b&w?)
(define/override (get-clear-operator) (define/override (get-clear-operator)
(if (send bm has-alpha-channel?) (if (or b&w? (send bm has-alpha-channel?))
CAIRO_OPERATOR_CLEAR CAIRO_OPERATOR_CLEAR
CAIRO_OPERATOR_OVER)) CAIRO_OPERATOR_OVER))