Daniel Hartwig <[email protected]> skribis:

> +;; emacs: (put 'declare-relative-uri-header! 'scheme-indent-function 1)
> +(define (declare-relative-uri-header! name)
> +  (declare-header! name
> +    (lambda (str)
> +      (or (string->uri str)                       ; absolute URI
> +          (build-uri #f                           ; relative URI
> +                     #:path str
> +                     #:validate? #f)))
> +    uri?
> +    write-uri))
> +
>
> Sorry for late response.
>
> Setting uri-path to str will result in wrongly constructed uri
> objects.  In practice, the relative uri will often have a query part.
> In theory, they may also contain any other part of the uri except
> scheme (which would make them absolute).

Sure.  But then again, the goal was just to have a hack that would solve
the problem initially reported here, while waiting for a proper fix.

I’m open to suggestions.  It seems to me that it’s either this or your
patches against (web uri).  WDYT?

Ludo’.



Reply via email to