diff --git a/collects/frtime/graphics-posn-less-unit.ss b/collects/frtime/graphics-posn-less-unit.ss
index 9a6d7639eb..7ce8f71f0a 100644
--- a/collects/frtime/graphics-posn-less-unit.ss
+++ b/collects/frtime/graphics-posn-less-unit.ss
@@ -65,6 +65,7 @@
            (send buffer-dc set-bitmap bitmap)
            (send buffer-dc set-brush (send dc get-brush))
            (send buffer-dc set-pen (send dc get-pen))
+           (send buffer-dc set-smoothing 'aligned)
            (let ([f (send dc get-font)])
              (when f
                (send buffer-dc set-font f)))