@@ -18,7 +18,9 @@ loadHaskellPlatform ss = do
18 e <- doesFileExist fp
18 e <- doesFileExist fp
20 then fmap (Just . parseHP) $ readFile fp
20 then fmap (Just . parseHP) $ readFile fp
22+ putStrLn "Warning: No Haskell Platform found for current GHC version"
21− else return Nothing
23+ return Nothing
23 GhcMajorVersion x y = selectGhcVersion ss
25 GhcMajorVersion x y = selectGhcVersion ss