From b976eb5353854423807c84caece1c5394a273cf7 Mon Sep 17 00:00:00 2001 From: Yaroslav Halchenko Date: Tue, 18 Sep 2018 17:21:46 -0400 Subject: [PATCH] BF(minor): missing space after "Unsupported url scheme" msg before the scheme --- Utility/Url.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Utility/Url.hs b/Utility/Url.hs index a34ae23ca7..92e60b3354 100644 --- a/Utility/Url.hs +++ b/Utility/Url.hs @@ -151,7 +151,7 @@ checkPolicy uo u onerr a unsupportedUrlScheme :: URI -> IO () unsupportedUrlScheme u = do hPutStrLn stderr $ - "Unsupported url scheme" ++ show u + "Unsupported url scheme " ++ show u hFlush stderr allowedScheme :: UrlOptions -> URI -> Bool