tedkulp/breezewiki
1
0
Fork 0
mirror of https://gitdab.com/cadence/breezewiki.git synced 2026-03-05 13:40:27 -05:00
Code Issues Packages Projects Releases Wiki Activity

Pass siteinfo through code; show sitename in title

Browse Source
This commit is contained in:
Cadence Ember
2022-10-09 22:50:50 +13:00
parent 9aba3ad432
commit 59332fd9d1
5 changed files with 30 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/page-category.rkt
View File

@@ -35,14 +35,14 @@
#:members-data members-data
#:page page
#:body-class [body-class #f]
#:license [license #f])
#:siteinfo [siteinfo #f])
(define members (jp "/query/categorymembers" members-data))
(generate-wiki-page
#:source-url source-url
#:wikiname wikiname
#:title title
#:body-class body-class
#:license license
#:siteinfo siteinfo
`(div
,(update-tree-wiki page wikiname)
(hr)
@@ -89,7 +89,7 @@
(log-outgoing dest-url)
(define dest-res (easy:get dest-url #:timeouts timeouts))
(easy:response-json dest-res)]
[license (siteinfo-license (siteinfo-fetch wikiname))])
[siteinfo (siteinfo-fetch wikiname)])
(define title (preprocess-html-wiki (jp "/parse/title" page-data prefixed-category)))
(define page-html (preprocess-html-wiki (jp "/parse/text" page-data "")))
@@ -105,7 +105,7 @@
#:members-data members-data
#:page page
#:body-class body-class
#:license license))
#:siteinfo siteinfo))
(when (config-true? 'debug)
; used for its side effects