From 11d4f9c00cebc9ea7c3dcb822ad9a5a64af43d49 Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Thu, 7 Feb 2008 21:12:12 +0000
Subject: [PATCH] improved error message

svn: r8574
---
 collects/net/cgi-unit.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/net/cgi-unit.ss b/collects/net/cgi-unit.ss
index e9aec0be78..38ca9a0a2e 100644
--- a/collects/net/cgi-unit.ss
+++ b/collects/net/cgi-unit.ss
@@ -207,7 +207,7 @@
   ;; -- string is either GET or POST (though future extension is possible)
   (define (get-cgi-method)
     (or (getenv "REQUEST_METHOD")
-        (error 'get-cgi-method "REQUEST_METHOD environment variable: expected string, got #f")))
+        (error 'get-cgi-method "no REQUEST_METHOD environment variable")))
 
   ;; generate-link-text : string x html-string -> html-string
   (define (generate-link-text url anchor-text)