$newline never
<dl .deflist #changelog>
  $forall (Down d, es) <- Map.toList changelogEntries
    <dt .deflist__dt ##{"changelog-date--" <> toPathPiece d}>
      ^{formatTimeW SelFormatDate d}
    <dd .deflist__dd>
      <ul>
        $forall e <- Set.toList es
          <li ##{"changelog-item--" <> toPathPiece e}>
            $if is _ChangelogItemBugfix $ classifyChangelogItem e
              <i>
                _{ChangelogItemBugfix}
                : #
            ^{changelogItems ! toPathPiece e}