From b3cfbe77c990d8a3dc3ab08e8755783295880819 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 12 Oct 2010 15:55:42 -0400 Subject: [PATCH] Minor typo in error call --- collects/handin-server/main.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/handin-server/main.rkt b/collects/handin-server/main.rkt index 2054d7b14e..0684776865 100644 --- a/collects/handin-server/main.rkt +++ b/collects/handin-server/main.rkt @@ -678,7 +678,7 @@ (define (handle-*-request r w) (let* ([proto (regexp-match-peek #rx#"^[^\r\n]*(?=\r?\n)" r 0 (* 4 1024))] [proto (and proto (car proto))]) - ((cond [(not proto) (error 'handin "no protocol line" proto)] + ((cond [(not proto) (error 'handin "no protocol line")] [(equal? #"handin" proto) handle-handin-request] [(regexp-match? #rx#"(?i:http/[0-9.]+)$" proto) handle-http-request] [else (error 'handin "unknown protocol: ~e" proto)])