diff options
Diffstat (limited to 'module/web')
-rw-r--r-- | module/web/http.scm | 2 | ||||
-rw-r--r-- | module/web/request.scm | 2 | ||||
-rw-r--r-- | module/web/response.scm | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/module/web/http.scm b/module/web/http.scm index b060af91e..c15bc3ed7 100644 --- a/module/web/http.scm +++ b/module/web/http.scm @@ -205,7 +205,7 @@ header with name @var{sym}." (define (write-header sym val port) "Writes the given header name and value to @var{port}. If @var{sym} is a known header, uses the specific writer registered for that header. -Otherwise the value is written using @var{display}." +Otherwise the value is written using @code{display}." (display (header->string sym) port) (display ": " port) ((header-writer sym) val port) diff --git a/module/web/request.scm b/module/web/request.scm index c9204a4bf..8259887c0 100644 --- a/module/web/request.scm +++ b/module/web/request.scm @@ -217,7 +217,7 @@ on @var{port}, perhaps using some transfer encoding." (bytevector-length bv) nbytes)))))) (define (write-request-body r bv) - "Write @var{body}, a bytevector, to the port corresponding to the HTTP + "Write @var{bv}, a bytevector, to the port corresponding to the HTTP request @var{r}." (put-bytevector (request-port r) bv)) diff --git a/module/web/response.scm b/module/web/response.scm index 62837721c..f49a602f0 100644 --- a/module/web/response.scm +++ b/module/web/response.scm @@ -226,7 +226,7 @@ on @var{port}, perhaps using some transfer encoding." (bytevector-length bv) nbytes)))))) (define (write-response-body r bv) - "Write @var{body}, a bytevector, to the port corresponding to the HTTP + "Write @var{bv}, a bytevector, to the port corresponding to the HTTP response @var{r}." (put-bytevector (response-port r) bv)) |