-- <ul>
-- <li>
-- <a href="...">...</a>
--- <span class="date">...</span>
+-- <div class="date">...</div>
-- <p> <!-- サマリが無ければ存在しない -->
-- blah blah...
-- </p>
, linkText = Nothing
}
)
- , Inline ( Span [("class", "date")]
- [Text (formatRFC1123DateTime (pageLastMod page))]
- )
+ , Block ( Div [("class", "date")]
+ [Inline (Text (formatRFC1123DateTime (pageLastMod page)))]
+ )
]
++
case pageSummary page of