diff --git a/collects/scribblings/htdp-langs/prim-ops.rkt b/collects/scribblings/htdp-langs/prim-ops.rkt
index 6fdd02885c..473e39851b 100644
--- a/collects/scribblings/htdp-langs/prim-ops.rkt
+++ b/collects/scribblings/htdp-langs/prim-ops.rkt
@@ -5,7 +5,7 @@
          scribble/struct
          scribble/racket
          racket/list
-         scheme/pretty
+         racket/pretty
          syntax/docprovide
          (for-syntax racket/base)
          )
@@ -33,7 +33,7 @@
 (define (typeset-type type)
   (let-values ([(in out) (make-pipe)])
     (parameterize ([pretty-print-columns 50])
-      (pretty-print type out))
+      (pretty-write type out))
     (port-count-lines! in)
     (read-syntax #f in)))