diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,6 +1,6 @@
 # ats-pkg
 
-## 3.2.5.0
+## 3.2.5.6
 
   * Use `libarchive` instead of `tar`
   * Change URL for compilers
diff --git a/ats-pkg.cabal b/ats-pkg.cabal
--- a/ats-pkg.cabal
+++ b/ats-pkg.cabal
@@ -1,12 +1,12 @@
 cabal-version: 2.0
 name: ats-pkg
-version: 3.2.5.3
+version: 3.2.5.6
 license: BSD3
 license-file: LICENSE
 copyright: Copyright: (c) 2018-2019 Vanessa McHale
 maintainer: vamchale@gmail.com
 author: Vanessa McHale
-tested-with: ghc ==8.4.4 ghc ==8.2.2 ghc ==8.6.3
+tested-with: ghc ==8.4.4 ghc ==8.2.2 ghc ==8.6.4
 bug-reports: https://github.com/vmchale/atspkg/issues
 synopsis: A build tool for ATS
 description:
diff --git a/src/Language/ATS/Package/Build.hs b/src/Language/ATS/Package/Build.hs
--- a/src/Language/ATS/Package/Build.hs
+++ b/src/Language/ATS/Package/Build.hs
@@ -271,7 +271,8 @@
 
 -- | The directory that will be @PATSHOME@.
 patsHomeAtsPkg :: MonadIO m => Version -> m String
-patsHomeAtsPkg v = fmap (</> show v) (pkgHome (GCC Nothing Nothing))
+patsHomeAtsPkg v = fmap (</> (vs </> "ATS2-Postiats-" ++ vs)) (pkgHome (GCC Nothing Nothing))
+    where vs = show v
 
 home' :: MonadIO m => Version -- ^ Compiler version
                    -> Version -- ^ Library version
diff --git a/src/Language/ATS/Package/Compiler.hs b/src/Language/ATS/Package/Compiler.hs
--- a/src/Language/ATS/Package/Compiler.hs
+++ b/src/Language/ATS/Package/Compiler.hs
@@ -26,10 +26,13 @@
 
 compilerDir :: Version -> IO FilePath
 compilerDir v = makeAbsolute =<< dir
-    where dir = getAppUserDataDirectory ("atspkg" </> show v)
+    where dir = getAppUserDataDirectory ("atspkg" </> vs </> "ATS2-Postiats-" ++ vs)
+          vs = show v
 
 pkgUrl :: Version -> String
-pkgUrl v = "https://github.com/vmchale/atspkg/releases/download/compiler/ATS2-Postiats-" ++ show v ++ ".tar.gz"
+pkgUrl v =
+    let vs = show v
+        in "https://cytranet.dl.sourceforge.net/project/ats2-lang/ats2-lang/ats2-postiats-" ++ vs ++ "/ATS2-Postiats-" ++ vs ++ ".tgz"
 
 withCompiler :: String -> Version -> IO ()
 withCompiler s v = putStrLn $ s ++ " compiler v" ++ show v ++ "..."
@@ -48,7 +51,7 @@
         response <- responseBody <$> httpLbs (initialRequest { method = "GET" }) manager
 
         withCompiler "Unpacking" v
-        Archive.unpackToDir cd (BS.toStrict $ decompress response)
+        Archive.unpackToDir (takeDirectory cd) (BS.toStrict $ decompress response)
 
 make :: Verbosity -> Version -> FilePath -> IO ()
 make v' v cd =