stackage-server/templates/blog-post.hamlet

<h1>#{postTitle post}
<p #author>
  By #{postAuthor post}, #
  <abbr title=#{show $ postTime post}>#{dateDiff now (utctDay $ postTime post)}

<article>#{postBody post}

<section #archive>

  <h2>Archive

  <ul>
    $forall post' <- posts
      <li>
        <a href=@?{addPreview $ BlogPostR (postYear post') (postMonth post') (postSlug post')}>
          #{postTitle post'}, #
          <abbr title=#{show $ postTime post}>#{dateDiff now (utctDay $ postTime post')}