diff --git a/misc/build_artifacts.hs b/misc/build_artifacts.hs index c3ca01c5..3c3166cd 100644 --- a/misc/build_artifacts.hs +++ b/misc/build_artifacts.hs @@ -6,6 +6,7 @@ import Turtle import qualified Control.Foldl as L import Control.Monad +import qualified Data.Text as T import Distribution.Package import Distribution.PackageDescription import Distribution.PackageDescription.Parsec @@ -58,12 +59,12 @@ main = sh $ do when b $ rmtree pkg mktree (pkg "bin") - let binDir = fromText (lineToText local_install_root) "bin" + let binDir = T.unpack (lineToText local_install_root) "bin" forM exe_files $ \name -> do cp (binDir addExeSuffix name) (pkg "bin" addExeSuffix name) mktree (pkg "lib") - let libDir = fromText (lineToText local_install_root) "lib" + let libDir = T.unpack (lineToText local_install_root) "lib" when (Info.os == "mingw32") $ do cp (libDir "toysat-ipasir.dll") (pkg "bin" "toysat-ipasir.dll") proc "stack"