rename description to desc
This commit is contained in:
parent
49eff9c009
commit
87c3fa5b75
7 changed files with 38 additions and 38 deletions
|
@ -31,7 +31,7 @@ make nsfw dir = toLazyText . make' nsfw dir
|
|||
|
||||
make' :: Bool -> FilePath -> Info -> Builder
|
||||
make' nsfw dir (Info {date, title, artist, tags, nsfwTags,
|
||||
description, nsfwDescription, images, links}) = [b|@0
|
||||
desc, nsfwDesc, images, links}) = [b|@0
|
||||
<!DOCTYPE html>
|
||||
<html lang=en>
|
||||
<meta charset=utf-8>
|
||||
|
@ -84,7 +84,7 @@ make' nsfw dir (Info {date, title, artist, tags, nsfwTags,
|
|||
download0 = fromMaybe path0 (#download image0)
|
||||
path0' = pageFile path0
|
||||
|
||||
descSection = makeDesc nsfw description nsfwDescription
|
||||
descSection = makeDesc nsfw desc nsfwDesc
|
||||
tagsList = makeTags nsfw tags nsfwTags
|
||||
linksList = extLinks nsfw links
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue