From 2fe25c0de0cb0c6ff7d0ecbc4c0c4e7b743406f9 Mon Sep 17 00:00:00 2001 From: Mike Pilgrem Date: Fri, 28 Apr 2023 21:32:54 +0100 Subject: [PATCH] Re #5584 Fix duplicated message --- src/Stack/Setup.hs | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) diff --git a/src/Stack/Setup.hs b/src/Stack/Setup.hs index 1fd44d3459..a32c809197 100644 --- a/src/Stack/Setup.hs +++ b/src/Stack/Setup.hs @@ -1159,14 +1159,7 @@ ensureSandboxedCompiler sopts getSetupInfo' = do -- sandbox. This led to a specific issue on Windows with GHC 9.0.1. See -- https://gitlab.haskell.org/ghc/ghc/-/issues/20074. Instead, now, we look -- on the paths specified only. - let loop [] = do - logError $ - "Looked for sandboxed compiler named one of: " - <> displayShow names - logError $ - "Could not find it on the paths " - <> displayShow (edBins paths) - prettyThrowIO $ SandboxedCompilerNotFound names (edBins paths) + let loop [] = prettyThrowIO $ SandboxedCompilerNotFound names (edBins paths) loop (x:xs) = do res <- liftIO $ D.findExecutablesInDirectories (map toFilePath (edBins paths)) x