Compare commits
2 commits
c3c4ea9e55
...
4cbe6fe289
Author | SHA1 | Date | |
---|---|---|---|
4cbe6fe289 | |||
de575d4e47 |
2 changed files with 1 additions and 2 deletions
|
@ -18,7 +18,7 @@
|
||||||
|
|
||||||
;; fandom wikinames * Title * Main Page * Search page override * API endpoint override
|
;; fandom wikinames * Title * Main Page * Search page override * API endpoint override
|
||||||
(define wikis
|
(define wikis
|
||||||
'(((gallowmere) "Gallowmere Historia" "https://medievil.wiki/w/Main_Page" #f #f)
|
'(((gallowmere) "MediEvil Wiki" "https://medievil.wiki/w/Main_Page" #f #f)
|
||||||
((fallout) "Fallout Wiki" "https://fallout.wiki/wiki/Fallout_Wiki" #f "https://fallout.wiki/api.php")
|
((fallout) "Fallout Wiki" "https://fallout.wiki/wiki/Fallout_Wiki" #f "https://fallout.wiki/api.php")
|
||||||
))
|
))
|
||||||
|
|
||||||
|
|
|
@ -56,7 +56,6 @@
|
||||||
(printf "using offline mode for style ~a ~a~n" wikiname dest))
|
(printf "using offline mode for style ~a ~a~n" wikiname dest))
|
||||||
(log-styles-request #t wikiname dest)
|
(log-styles-request #t wikiname dest)
|
||||||
(define fs-path (build-path path-archive wikiname "styles" dest))
|
(define fs-path (build-path path-archive wikiname "styles" dest))
|
||||||
(println fs-path)
|
|
||||||
(unless (file-exists? fs-path)
|
(unless (file-exists? fs-path)
|
||||||
(next-dispatcher))
|
(next-dispatcher))
|
||||||
(response-handler
|
(response-handler
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue