fix set-bitmap in image-snip% (PR 10188)

svn: r14471
2009-04-08 23:34:41 +00:00 · 2009-04-08 23:34:41 +00:00 · d74cb0735d
commit d74cb0735d
parent 9f2e546f01
1 changed files with 1 additions and 1 deletions
--- a/collects/mred/private/wxme/snip.ss
+++ b/collects/mred/private/wxme/snip.ss
@ -1039,7 +1039,7 @@
        'unknown))

  (def/public (set-bitmap [(make-or-false bitmap%) map]
-                          [(make-or-false bitmap%) msk])
+                          [(make-or-false bitmap%) [msk #f]])
    (do-set-bitmap map msk #t))

  (define/private (do-set-bitmap map msk refresh?)