@@ -175,6 +175,7 @@ getUTCMaybe :: TimeLocale -- ^ Output time locale
175getUTCMaybe locale page = msum
175getUTCMaybe locale page = msum
176 [ fromPublished "%a, %d %b %Y %H:%M:%S UT"
176 [ fromPublished "%a, %d %b %Y %H:%M:%S UT"
177 , fromPublished "%Y-%m-%dT%H:%M:%SZ"
177 , fromPublished "%Y-%m-%dT%H:%M:%SZ"
178+ , fromPublished "%Y-%m-%d %H:%M:%S"
178 , fromPublished "%B %e, %Y %l:%M %p"
179 , fromPublished "%B %e, %Y %l:%M %p"
179 , fromPublished "%B %e, %Y"
180 , fromPublished "%B %e, %Y"
180 , getFieldMaybe "path" page >>= parseTime' "%Y-%m-%d" .
181 , getFieldMaybe "path" page >>= parseTime' "%Y-%m-%d" .