From d570c1c0bd1d6f7caadcde2dbb9f1ada6a662d5c Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 16 Jan 2007 04:34:13 +0000 Subject: [PATCH] typo svn: r5361 --- collects/handin-server/sandbox.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/handin-server/sandbox.ss b/collects/handin-server/sandbox.ss index c2297fcd16..06ed4c7483 100644 --- a/collects/handin-server/sandbox.ss +++ b/collects/handin-server/sandbox.ss @@ -93,7 +93,7 @@ [(bytes? inp) (open-input-bytes inp)] [(path? inp) (open-input-file inp)] [else (error 'read-code "bad input: ~e" inp)])]) - (port-count-lines! current-input-port) + (port-count-lines! (current-input-port)) ((sandbox-reader)))) (define (evaluate-program language teachpacks input-program uncovered!)