...
svn: r8572
This commit is contained in:
parent
16f4125d0e
commit
d135abdd17
|
@ -207,7 +207,7 @@
|
||||||
;; -- string is either GET or POST (though future extension is possible)
|
;; -- string is either GET or POST (though future extension is possible)
|
||||||
(define (get-cgi-method)
|
(define (get-cgi-method)
|
||||||
(or (getenv "REQUEST_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
|
;; generate-link-text : string x html-string -> html-string
|
||||||
(define (generate-link-text url anchor-text)
|
(define (generate-link-text url anchor-text)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user