drop recorded dc drawing actions on `erase'
This commit is contained in:
parent
1a190c08f6
commit
fc9d1694f6
|
@ -184,7 +184,9 @@
|
||||||
|
|
||||||
(define/record (clear))
|
(define/record (clear))
|
||||||
|
|
||||||
(define/record (erase))
|
(define/override (erase)
|
||||||
|
(super erase)
|
||||||
|
(set! procs null))
|
||||||
|
|
||||||
(define/record (draw-arc x y
|
(define/record (draw-arc x y
|
||||||
width height
|
width height
|
||||||
|
|
Loading…
Reference in New Issue
Block a user