diff options
Diffstat (limited to 'Command')
-rw-r--r-- | Command/ImportFeed.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs index 71cd0dc82..4bd02e062 100644 --- a/Command/ImportFeed.hs +++ b/Command/ImportFeed.hs @@ -228,7 +228,7 @@ feedFile tmpl i extension = Utility.Format.format tmpl $ extractMetaData :: ToDownload -> MetaData extractMetaData i = case getItemPublishDate (item i) :: Maybe (Maybe UTCTime) of - Just (Just d) -> addDateMetaData d meta + Just (Just d) -> unionMetaData meta (dateMetaData d meta) _ -> meta where tometa (k, v) = (mkMetaFieldUnchecked k, S.singleton (toMetaValue v)) |