fix whitespace

Thanks to a compile warning from new ghc

diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs
index 9b51b03a7fcad6b4d9cdb18ed2109e5df255cf0d..3122c8f6015d8a040f9cd1192f04e4dd64a19eb4 100644 (file)
--- a/Command/ImportFeed.hs
+++ b/Command/ImportFeed.hs
@@ -531,7 +531,7 @@ minimalMetaData :: ToDownload -> MetaData
 minimalMetaData i = case getItemId (item i) of
        (Nothing) -> emptyMetaData
        (Just (_, itemid)) -> MetaData $ M.singleton itemIdField 
-               (S.singleton $ toMetaValue $fromFeedText itemid)
+               (S.singleton $ toMetaValue $ fromFeedText itemid)
 
 {- Extract fields from the feed and item, that are both used as metadata,
  - and to generate the filename. -}