diff options
-rwxr-xr-x | install.hs | 10 |
1 files changed, 9 insertions, 1 deletions
@@ -4,6 +4,7 @@ --ghc-options -Wall -} +{-# LANGUAGE CPP #-} -- = About -- -- Install multiple versions of haskell-code-indexer, each with the version of @@ -31,7 +32,7 @@ import Data.Foldable import Data.List (dropWhileEnd) import qualified Data.Text as T import Data.Text.Encoding -import Development.Shake.FilePath +import System.FilePath ((<.>), (</>)) import Options.Applicative import System.Directory (copyFile, removeFile) import System.Process.Typed @@ -142,6 +143,13 @@ buildVersion v = do copyFile fromFile toFile removeFile fromFile +exe :: String +#if defined(mingw32_HOST_OS) +exe = "exe" +#else +exe = "" +#endif + -- | E.g. @"/home/user/bin"@. getLocalBin :: IO FilePath getLocalBin = do |