From 2783b8f6931acd0e5f597d533a6cfb8e10ba59ba Mon Sep 17 00:00:00 2001 From: Julian Ospald Date: Sun, 1 Jan 2023 23:27:37 +0800 Subject: [PATCH] Fix 'ghcup install hls -u' on windows Fixes #716 --- app/ghcup/GHCup/OptParse/Install.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/app/ghcup/GHCup/OptParse/Install.hs b/app/ghcup/GHCup/OptParse/Install.hs index 80df955..2952203 100644 --- a/app/ghcup/GHCup/OptParse/Install.hs +++ b/app/ghcup/GHCup/OptParse/Install.hs @@ -452,7 +452,7 @@ install installCommand settings getAppState' runLogger = case installCommand of (_tvVersion -> v, vi) <- liftE $ fromVersion instVer HLS -- TODO: support legacy liftE $ runBothE' (installHLSBindist - (DownloadInfo uri (Just $ RegexDir "haskell-language-server-*") "") + (DownloadInfo uri (if isWindows then Nothing else Just (RegexDir "haskell-language-server-*")) "") v (maybe GHCupInternal IsolateDir isolateDir) forceInstall