maurice/snix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[blog] Minor design fixes

Browse source
This commit is contained in:
Vincent Ambo 2015-11-21 18:31:39 +01:00
parent e6a20995f5
commit 28b00ef3d4
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Blog.hs
View file

@ -82,6 +82,7 @@ $forall entry <- toDisplay
$else $else
^{preEscapedToHtml $ btext entry} ^{preEscapedToHtml $ btext entry}
$if ((/=) (mtext entry) empty) $if ((/=) (mtext entry) empty)
<p>
<a .uncoloured-link href=#{linkElems entry}> <a .uncoloured-link href=#{linkElems entry}>
#{readMore $ lang entry} #{readMore $ lang entry}
<hr> <hr>
@ -123,6 +124,7 @@ renderEntry e@Entry{..} = [shamlet|
<p>^{renderEntryMarkdown $ mtext} <p>^{renderEntryMarkdown $ mtext}
$else $else
^{preEscapedToHtml $ btext} ^{preEscapedToHtml $ btext}
<p>^{preEscapedToHtml $ mtext}
<hr> <hr>
|] |]