moved where smoothing was enabled

svn: r2703
This commit is contained in:
Matthew Flatt 2006-04-18 13:12:51 +00:00
parent 2bcd8365ae
commit ffe615cf03

View File

@ -156,8 +156,6 @@
face-pupils-dx face-pupils-dy)))
(send c on-paint))
(send (send c get-dc) set-smoothing 'aligned)
(define (cb dc) (draw-pict the-pict dc 0 0))
(send c min-width (inexact->exact (floor (* canvas-scale (pict-width the-pict)))))