1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00

fix name...

* module/web/request.scm (read-request-body/latin-1): Fix name...
This commit is contained in:
Andy Wingo 2010-12-06 15:32:13 +01:00
parent e46f69e25c
commit a9a2065540

View file

@ -192,7 +192,7 @@
;; Probably not what you want to use "in production". Relies on one byte ;; Probably not what you want to use "in production". Relies on one byte
;; per char because we are in latin-1 encoding. ;; per char because we are in latin-1 encoding.
;; ;;
(define (read-response-body/latin-1 r) (define (read-request-body/latin-1 r)
(cond (cond
((request-content-length r) => ((request-content-length r) =>
(lambda (nbytes) (lambda (nbytes)