...
svn: r8572 original commit: d135abdd17aba4911b049f084c6c40b9b665bb4b
This commit is contained in:
parent
16ed01274e
commit
c0170dc646
|
@ -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 ~v" (getenv "REQUEST_METHOD"))))
|
||||
(error 'get-cgi-method "REQUEST_METHOD environment variable: expected string, got #f")))
|
||||
|
||||
;; generate-link-text : string x html-string -> html-string
|
||||
(define (generate-link-text url anchor-text)
|
||||
|
|
Loading…
Reference in New Issue
Block a user