nek0/eidolon
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

activated comment deletion

Browse source
This commit is contained in:
nek0 2014-12-08 06:36:38 +01:00
parent 2446940baf
commit d51ffe8213
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
templates/medium.hamlet
View file

@ -36,12 +36,16 @@ $else
$if userId /= Nothing $if userId /= Nothing
<hr> <hr>
<a href=@{CommentReplyR commentId}>Reply to this comment <a href=@{CommentReplyR commentId}>Reply to this comment
$if userId == (commentAuthor comment)
<a href=@{CommentDeleteR commentId}>Delete this comment
$forall (Entity replyId reply) <- replies $forall (Entity replyId reply) <- replies
$if commentParent reply == Just commentId $if commentParent reply == Just commentId
<pre class="reply"> <pre class="reply">
<a href=@{ProfileR $ fromJust $ commentAuthor reply}>#{fromJust $ commentAuthorSlug reply}</a> wrote on #{formatTime defaultTimeLocale "%A %F %H:%M" $ commentTime reply}: <a href=@{ProfileR $ fromJust $ commentAuthor reply}>#{fromJust $ commentAuthorSlug reply}</a> wrote on #{formatTime defaultTimeLocale "%A %F %H:%M" $ commentTime reply}:
<hr> <hr>
#{commentContent reply} #{commentContent reply}
$if userId == (commentAuthor comment)
<a href=@{CommentDeleteR commentId}>Delete this comment
$if userId /= Nothing $if userId /= Nothing
<form method=post enctype=#{enctype}> <form method=post enctype=#{enctype}>