moved where smoothing was enabled
svn: r2703
This commit is contained in:
parent
2bcd8365ae
commit
ffe615cf03
|
@ -156,8 +156,6 @@
|
||||||
face-pupils-dx face-pupils-dy)))
|
face-pupils-dx face-pupils-dy)))
|
||||||
(send c on-paint))
|
(send c on-paint))
|
||||||
|
|
||||||
(send (send c get-dc) set-smoothing 'aligned)
|
|
||||||
|
|
||||||
(define (cb dc) (draw-pict the-pict dc 0 0))
|
(define (cb dc) (draw-pict the-pict dc 0 0))
|
||||||
|
|
||||||
(send c min-width (inexact->exact (floor (* canvas-scale (pict-width the-pict)))))
|
(send c min-width (inexact->exact (floor (* canvas-scale (pict-width the-pict)))))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user