diff --git a/src/page-file.rkt b/src/page-file.rkt index d112e10..d6b5f33 100644 --- a/src/page-file.rkt +++ b/src/page-file.rkt @@ -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 wikiname (path/param-path (first (url-path (request-uri req)))))