Fix runLeanWhereIs on windows

2021-07-19 16:56:28 +02:00 · 2021-07-19 16:56:28 +02:00 · bc13a4555d
commit bc13a4555d
parent eaad2caf25
1 changed files with 3 additions and 1 deletions
--- a/app/ghcup/Main.hs
+++ b/app/ghcup/Main.hs
@ -1533,7 +1533,9 @@ Report bugs at <https://gitlab.haskell.org/haskell/ghcup-hs/issues>|]
          let
            runLeanWhereIs =
              runLogger
-                . runLeanAppState
+                -- Don't use runLeanAppState here, which is disabled on windows.
+                -- This is the only command on all platforms that doesn't need full appstate.
+                . flip runReaderT leanAppstate
                . runE
                  @'[ NotInstalled
                    , NoToolVersionSet