From a3fae4a35502411792cd28ac3a7483c0fde470a8 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Wed, 21 Sep 2005 04:41:51 +0000 Subject: [PATCH] oops, still using the same protocol svn: r893 --- collects/handin-server/handin-server.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/handin-server/handin-server.ss b/collects/handin-server/handin-server.ss index 1a0e35d7c7..30f54e39b0 100644 --- a/collects/handin-server/handin-server.ss +++ b/collects/handin-server/handin-server.ss @@ -480,8 +480,8 @@ ;; see note on close-output-port below (close-output-port w)))]) (let ([protocol (read r-safe)]) - (if (eq? protocol 'ver1) - (write+flush w 'ver1) + (if (eq? protocol 'original) + (write+flush w 'original) (error 'handin "unknown protocol: ~s" protocol))) (accept-submission-or-update (assignment-list) r r-safe w) (LOG "normal exit")