From 4e697e4cc6474ccfadf2197b06a960d6c89a8bb2 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 5 Jul 1996 17:21:04 +0000 Subject: [PATCH] fixed color combining logical function original commit: 79d86a0ff037c7c156af0768c50b747fd3e8b039 --- collects/mred/edit.ss | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/collects/mred/edit.ss b/collects/mred/edit.ss index 5706d2ec..ad11f972 100644 --- a/collects/mred/edit.ss +++ b/collects/mred/edit.ss @@ -384,8 +384,9 @@ (send brush set-style wx:const-solid) (send pen set-colour color) (send brush set-colour color) - (send dc set-logical-function wx:const-and-invert)] - [b/w-bitmap + (send dc set-logical-function wx:const-and)] + [(and b/w-bitmap + (eq? wx:platform 'unix)) (send pen set-stipple b/w-bitmap) (send brush set-stipple b/w-bitmap)] [else (send dc set-logical-function wx:const-xor)