From 86022fd24bad41d061494de598ca40ae2ac41937 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 3 Jul 2007 05:37:41 +0000
Subject: [PATCH] missing inp in read-bytes

svn: r6805
---
 collects/scribble/reader.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/scribble/reader.ss b/collects/scribble/reader.ss
index e5d5540ca9..5b2c384956 100644
--- a/collects/scribble/reader.ss
+++ b/collects/scribble/reader.ss
@@ -365,7 +365,7 @@
                                  [(caddr m)
                                   ;; it's an expression escape, get multiple
                                   ;; expressions and put them all here
-                                  (read-bytes (caaddr m))
+                                  (read-bytes (caaddr m) inp)
                                   (let ([escapes (get-escape-expr
                                                   #f line col pos)])
                                     ;; make @|| a comment that can be used to