Replace some %F with showDate

src/Vervis/Handler/Ticket.hs

@@ -65,6 +65,7 @@ import Vervis.Model.Ident
 import Vervis.Render (renderSourceT)
 import Vervis.Settings (widgetFile)
 import Vervis.TicketFilter (filterTickets)
+import Vervis.Time (showDate)
 import Vervis.Widget.Discussion (discussionW)
 import Vervis.Widget.Sharer (personLinkW)
 

templates/ticket/one.hamlet

@@ -20,7 +20,7 @@ $# <http://creativecommons.org/publicdomain/zero/1.0/>.
     <input type=submit value="Delete this ticket">
 
 <p>
-  Created on #{formatTime defaultTimeLocale "%F" $ ticketCreated ticket} by
+  Created on #{showDate $ ticketCreated ticket} by
   ^{personLinkW author}
 
 <p>
@@ -32,7 +32,7 @@ $# <http://creativecommons.org/publicdomain/zero/1.0/>.
 <p>
   Status:
   $if ticketDone ticket
-    Closed on #{formatTime defaultTimeLocale "%F" $ ticketClosed ticket} by
+    Closed on #{showDate $ ticketClosed ticket} by
     ^{personLinkW closer}.
 
     <form method=POST action=@{TicketOpenR shar proj num}>