diff --git a/collects/slideshow/viewer.ss b/collects/slideshow/viewer.ss
index 843bde6943..9de7a3f444 100644
--- a/collects/slideshow/viewer.ss
+++ b/collects/slideshow/viewer.ss
@@ -1065,6 +1065,7 @@
       
       (define (do-print)
 	(let ([ps-dc (dc-for-text-size)])
+	  (send ps-dc set-smoothing 'aligned) ; for printer-dc%
 	  (let loop ([start? #f][l (list-tail talk-slide-list current-page)][n current-page])
 	    (unless (null? l)
 	      (set! current-page n)