artemis/breezewiki
1
0
Fork 0
forked from cadence/breezewiki
Code Issues Pull requests 2 Projects Releases Packages Wiki Activity

Improve homepage, add testimonials

Browse source
This commit is contained in:
Cadence Ember 2022-09-08 14:50:29 +12:00
parent e6eabe9cf4
commit 0a27f6d87f
Signed by untrusted user: cadence
GPG key ID: BC1C2C61CF521B17
2 changed files with 16 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
src/page-home.rkt
View file

@ -24,22 +24,25 @@
(define content (define content
`((h2 "BreezeWiki makes wiki pages on Fandom readable") `((h2 "BreezeWiki makes wiki pages on Fandom readable")
(p "It removes ads, videos, and suggested content, leaving you with a clean page that doesn't consume all your data.") (p "It removes ads, videos, and suggested content, leaving you with a clean page that doesn't slow down your device or use up your data.")
(p "If you're looking for an \"alternative\" to Fandom for writing pages, you should look elsewhere. BreezeWiki only lets you read existing pages.")
(p "BreezeWiki can also be called an \"alternative frontend for Fandom\".") (p "BreezeWiki can also be called an \"alternative frontend for Fandom\".")
(p ,(format "To use BreezeWiki, just replace \"fandom.com\" with \"~a\", and you'll instantly be teleported to a better world."
(if (config-true? 'canonical_origin)
(url-host (string->url (config-get 'canonical_origin)))
"breezewiki.com")))
(h2 "Example pages") (h2 "Example pages")
(ul (ul
,@(map (λ (x) ,@(map (λ (x)
`(li (a (@ (href ,(apply format "/~a/wiki/~a" x))) `(li (a (@ (href ,(apply format "/~a/wiki/~a" x)))
,(apply format "~a: ~a" x)))) ,(apply format "~a: ~a" x))))
examples)) examples))
(h2 "How to use") (h2 "Testimonials")
(p ,(format "While browsing any page on Fandom, you can replace \"fandom.com\" in the address bar with \"~a\" to see the BreezeWiki version of that page." (p (@ (class "testimonial")) ">you are so right that fandom still sucks even with adblock somehow. even zapping all the stupid padding it still sucks —Minimus")
(if (config-true? 'canonical_origin) (p (@ (class "testimonial")) ">attempting to go to a wiki's forum page with breezewiki doesn't work, which is based honestly —Tom Skeleton")
(url-host (string->url (config-get 'canonical_origin))) (p (@ (class "testimonial")) ">Fandom pages crashing and closing, taking forever to load and locking up as they load the ads on the site... they are causing the site to crash because they are trying to load video ads both at the top and bottom of the site as well as two or three banner ads, then a massive top of site ad and eventually my anti-virus shuts the whole site down because it's literally pulling more resources than WoW in ultra settings... —Anonymous")
"breezewiki.com"))) (h2 "What BreezeWiki isn't")
(p "After that, you can click the links to navigate around the pages.") (p "BreezeWiki isn't an \"alternative\" to Fandom, and it doesn't let you edit or write new pages.")
(p "To get back to Fandom, click the link that's at the bottom of the page."))) (p "If you want to create your own wiki, try Miraheze!")))
(define body (define body
`(html `(html

4
static/internal.css
View file

@ -171,3 +171,7 @@ body {
.internal-footer { .internal-footer {
max-width: 700px; max-width: 700px;
} }
.testimonial {
color: #157937;
}