Re: [PATCH] http-client: Support basic authentication.

[Ludovic Courtès]

Ricardo Wurmus <address@hidden> skribis:

> Binding the result of (uri-userinfo uri) fixes it:
>
>       (let*-values ((userinfo (uri-userinfo uri))
>                     (auth-header
>                      (match userinfo
>                        ((str) (cons 'Authorization
>                                     (string-append "Basic "
>                                                    (base64-encode
>                                                     (string->utf8 str)))))
>                        (_ '())))
>                        ...) ...)
>
> I don’t understand this.  Does (uri-userinfo uri) return multiple
> values?

‘uri-userinfo’ is a simple field accessor; it returns one value.

Ludo’.