improved error message

svn: r8574
This commit is contained in:
Eli Barzilay 2008-02-07 21:12:12 +00:00
parent 52854f54bb
commit 11d4f9c00c

View File

@ -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)