]> gitweb @ CieloNegro.org - Rakka.git/blobdiff - Rakka/Wiki/Interpreter/PageList.hs
preparation for javascripts
[Rakka.git] / Rakka / Wiki / Interpreter / PageList.hs
index 2a10372d1b4e253c6cf174e11cb2ca7d2236e1c1..69ff0e72ee9697f1a913c892f786bddcecf65381 100644 (file)
@@ -20,7 +20,7 @@ interpreters = [ recentUpdatesInterp ]
 --   <ul>
 --     <li>
 --       <a href="...">...</a>
---       <span class="date">...</span>
+--       <div class="date">...</div>
 --       <p> <!-- サマリが無ければ存在しない -->
 --         blah blah...
 --       </p>
@@ -65,9 +65,9 @@ recentUpdatesInterp
                        , linkText     = Nothing
                        }
                     )
-            , Inline ( Span [("class", "date")]
-                                [Text (formatRFC1123DateTime (pageLastMod page))]
-                     )
+            , Block ( Div [("class", "date")]
+                              [Inline (Text (formatRFC1123DateTime (pageLastMod page)))]
+                    )
             ]
             ++
             case pageSummary page of