diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs
index 9b51b03a7f..3122c8f601 100644
--- 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. -}