Fix category pages with slashes

This commit is contained in:
Cadence Ember 2023-04-10 17:05:58 +12:00
parent d3187cc310
commit b5fb99c8ab
Signed by untrusted user: cadence
GPG key ID: BC1C2C61CF521B17

View file

@ -66,7 +66,7 @@
(define (page-category req) (define (page-category req)
(response-handler (response-handler
(define wikiname (path/param-path (first (url-path (request-uri req))))) (define wikiname (path/param-path (first (url-path (request-uri req)))))
(define prefixed-category (path/param-path (caddr (url-path (request-uri req))))) (define prefixed-category (string-join (map path/param-path (cddr (url-path (request-uri req)))) "/"))
(define origin (format "https://~a.fandom.com" wikiname)) (define origin (format "https://~a.fandom.com" wikiname))
(define source-url (format "~a/wiki/~a" origin prefixed-category)) (define source-url (format "~a/wiki/~a" origin prefixed-category))