image desc

This commit is contained in:
blankie 2022-10-08 21:11:38 +07:00
parent 940b6e01db
commit db0158f237
Signed by: blankie
GPG key ID: CC15FC822C7F61F5

View file

@ -72,8 +72,9 @@
"" ""
".")) "."))
`""))) `"")))
; ,(update-tree-wiki image-description wikiname) ,(if (string? image-description)
)) `(update-tree-wiki (html->xexp image-description) wikiname)
`""))
(define (page-file req) (define (page-file req)
(define wikiname (path/param-path (first (url-path (request-uri req))))) (define wikiname (path/param-path (first (url-path (request-uri req)))))