missing inp in read-bytes

svn: r6805
2007-07-03 05:37:41 +00:00 · 2007-07-03 05:37:41 +00:00 · 86022fd24b
commit 86022fd24b
parent f7c4631223
1 changed files with 1 additions and 1 deletions
--- 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