simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-11-07 21:15:19 +03:00
Code Issues Projects Releases Wiki Activity

;site: fix generation of cookbook pages

Browse Source 
[ci skip]
This commit is contained in:
Simon Michael 2019-08-25 06:20:14 -07:00
parent ece3d67ebf
commit b9b420290c
1 changed files with 4 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
Shake.hs
View File

@ -125,6 +125,9 @@ main = do
<$> S.getDirectoryContents commandsdir <$> S.getDirectoryContents commandsdir
let commandtxts = map (-<.> "txt") commandmds let commandtxts = map (-<.> "txt") commandmds
let sitedir = "site"
pages <- map takeBaseName . filter (".md" `isSuffixOf`) <$> S.getDirectoryContents sitedir
shakeArgs shakeArgs
shakeOptions shakeOptions
{ {
@ -213,17 +216,7 @@ main = do
[ v </> "manual" | v <- docversions, v <"1.0" ] -- before 1.0 there was only the combined manual [ v </> "manual" | v <- docversions, v <"1.0" ] -- before 1.0 there was only the combined manual
-- the html for website pages kept in the main repo -- the html for website pages kept in the main repo
mainpageshtml = map (normalise . ("site/_site" </>) . (<.> "html")) [ mainpageshtml = map (normalise . ("site/_site" </>) . (<.> "html")) pages
-- from site/*.md
"contributors"
,"download"
,"ledgertips"
,"index"
,"intro"
,"release-notes"
,"README"
,"CONTRIBUTING"
]
-- TODO: make website URIs lower-case ? -- TODO: make website URIs lower-case ?