Remove dangling `where` from one function.
commite51a2cedf9c46bd45143c4d896ac61d317cf0ebf
authorArtyom Kazak <yom@artyom.me>
dateSun 3 Aug 2014, 13:45 (12 years ago)
parent82118b3
src/Text/Pandoc/Writers/FB2.hs−1
@@ -294,7 +294,6 @@ fetchURL url = do
294294 let content_type = lookupHeader HdrContentType (getHeaders r)
295295 content <- liftM (Just . toStr . encode . toBS) . getResponseBody $ Right r
296296 return $ liftM2 (,) content_type content
297− where
298297
299298toBS :: String -> B.ByteString
300299toBS = B.pack . map (toEnum . fromEnum)