From aa5e333cb7305c84818f30c0a88dda8ba677a801 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 1 Aug 2023 18:36:54 -0400 Subject: [PATCH] fix whitespace Thanks to a compile warning from new ghc --- Command/ImportFeed.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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. -}