diff --git a/scheme/httpd/handler-lib.scm b/scheme/httpd/handler-lib.scm
index 37affd5..1289101 100644
--- a/scheme/httpd/handler-lib.scm
+++ b/scheme/httpd/handler-lib.scm
@@ -77,11 +77,11 @@
 	(if (not field-value)
 	    #f
 
-		; the field value is a list of transfer-codings (3.6),
+		; the field value is a comma-separated list of transfer-codings (3.6),
 		; extract the last transfer-coding in the list
 	    (let* ((reversed-field-value (string-reverse field-value))
 		   (index ; does the list contain more than one element?
-		    (string-contains reversed-field-value " , "))
+		    (string-contains reversed-field-value " ,"))
 		   (last-transfer-coding
 		    (if index
 			(string-trim (string-reverse (string-take reversed-field-value index)))