Index: http-client.scm
===================================================================
--- http-client.scm	(revision 22092)
+++ http-client.scm	(working copy)
@@ -298,7 +298,7 @@
     (for-each (lambda (c)
                 (and-let* (((get-param 'version c)) ; required for set-cookie2
                            (path (get-param 'path c (string-join (cdr (uri-path uri)) "/")))
-                           ((path-match? uri (get-param 'path c)))
+                           ((path-match? uri path))
                            (dn (get-param 'domain c (uri-host uri)))
                            ((or (string-ci=? dn ".local")
                                 (and (not (string-null? dn))