rename description to desc
This commit is contained in:
parent
49eff9c009
commit
87c3fa5b75
7 changed files with 38 additions and 38 deletions
|
@ -63,11 +63,11 @@ main2 (IndexPage {file, output}) = do
|
|||
let page = IndexPage.make info
|
||||
writeOutput output page
|
||||
|
||||
main2 (RSS {files, title, description, root, prefix, output, dataDir}) = do
|
||||
main2 (RSS {files, title, desc, root, prefix, output, dataDir}) = do
|
||||
infos <- mapM (infoYAML dataDir) files
|
||||
printV $ "infos" := infos
|
||||
let output' = takeFileName <$> output
|
||||
let rss = RSS.make root title description prefix output' infos
|
||||
let rss = RSS.make root title desc prefix output' infos
|
||||
writeOutput output rss
|
||||
|
||||
main2 (DependSingle {file, nsfw, output, prefix, buildDir, dataDir}) = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue