diff --git a/racket.lisp b/racket.lisp
index b6fa5e8bd756164ef36ab4d9138b1d75c783f780..ee82731f5f5d5d15e8effb0d79b822b00648e472 100644
--- a/racket.lisp
+++ b/racket.lisp
@@ -284,7 +284,7 @@
   (if (readtablep *scribble-at-readtable*)
       (enable-scribble-at-syntax :scribe scribe)
     (push-readtable *scribble-at-readtable*))
-  *scribble-readtable*)
+  *scribble-at-readtable*)
 
 (defun parse-at-string (x)
   (with-input-from-string (i x)