.
original commit: 3037628c8cb49ee4549d5e33ea905cfa5eedd0cd
This commit is contained in:
parent
5f64485b4f
commit
e3f4cdad60
|
@ -6787,12 +6787,12 @@
|
|||
(wx:unregister-collecting-blit (mred->wx canvas))))
|
||||
|
||||
(define bitmap-dc%
|
||||
(class100 wx:bitmap-dc% ([bm #f])
|
||||
(class100 wx:bitmap-dc% ([bitmap #f])
|
||||
(inherit set-bitmap)
|
||||
(sequence
|
||||
(super-init)
|
||||
(when bm
|
||||
(set-bitmap bm)))))
|
||||
(when bitmap
|
||||
(set-bitmap bitmap)))))
|
||||
|
||||
(define post-script-dc%
|
||||
(class100 wx:post-script-dc% ([interactive? #t][parent #f][use-paper-bbox? #f])
|
||||
|
|
Loading…
Reference in New Issue
Block a user