Commits

Peter Bex committed 21b6d4f

Uri-encode strings when replacing URI patterns

Comments (0)

Files changed (1)

henrietta-cache.scm

 (define (replace-uri-patterns uri patterns)
   (string-translate* uri (map (lambda (pattern)
                                 (cons (conc "{" (car pattern) "}")
-                                      (->string (cdr pattern))))
+                                      (uri-encode-string (->string (cdr pattern)))))
                               patterns)))
 
 ;; We could also use sendfile egg here, but do we want the dependency?