File tree Expand file tree Collapse file tree 1 file changed +6
-5
lines changed Expand file tree Collapse file tree 1 file changed +6
-5
lines changed Original file line number Diff line number Diff line change @@ -17,16 +17,17 @@ stackInstallHlsWithErrMsg mbVersionNumber args =
1717-- | copy the built binaries into the localBinDir
1818stackInstallHls :: Maybe VersionNumber -> [String ] -> Action ()
1919stackInstallHls mbVersionNumber args = do
20+ let args' = [ " install"
21+ , " :haskell-language-server-wrapper"
22+ , " :haskell-language-server"
23+ ] ++ args
2024 versionNumber <-
2125 case mbVersionNumber of
2226 Nothing -> do
23- execStackWithCfgFile_ " stack.yaml" $
24- [" install"
25- , " :haskell-language-server-wrapper"
26- , " :haskell-language-server" ] ++ args
27+ execStackWithCfgFile_ " stack.yaml" args'
2728 getGhcVersionOfCfgFile " stack.yaml" args
2829 Just vn -> do
29- execStackWithGhc_ vn $ [ " install " ] ++ args
30+ execStackWithGhc_ vn args'
3031 return vn
3132
3233 localBinDir <- getLocalBin args
You can’t perform that action at this time.
0 commit comments