1
0
Fork 0

Work around uri-encode changing capitalization

* tekuti/page.scm (make-post-key): Downcase, to cope with uri-encode
  from Guile changing from lower-case hexidecimals to upper-case.
  Otherwise older post keys wouldn't work...
This commit is contained in:
Andy Wingo 2014-01-19 18:56:52 +01:00
parent a08ae0c9a7
commit e8eb7aa176

View file

@ -61,7 +61,7 @@
;; Encoded twice, so as to form a single path-component. ;; Encoded twice, so as to form a single path-component.
(define (make-post-key . parts) (define (make-post-key . parts)
(uri-encode (encode-and-join-uri-path parts))) (string-downcase (uri-encode (encode-and-join-uri-path parts))))
(define (not-implemented request . args) (define (not-implemented request . args)
(respond `((h1 "Not yet implemented") (respond `((h1 "Not yet implemented")