@@ -19,6 +19,7 @@ import qualified Data.Map as Map
1919import qualified Data.Name as Name
2020import qualified Data.Set as Set
2121import qualified Data.Utf8 as Utf8
22+import System.FilePath ((</>))
2223
2324import qualified Deps.Website as Website
2425import qualified Elm.Compiler.Type as Type
@@ -356,7 +357,7 @@ changeMagnitude (Changes added changed removed) =
356357
357358getDocs :: Stuff.PackageCache -> Http.Manager -> Pkg.Name -> V.Version -> IO (Either Exit.DocsProblem Docs.Documentation)
358359getDocs cache manager name version =
359− do let path = Stuff.metadata cache name version "docs.json"
360+ do let path = Stuff.package cache name version </> "docs.json"
360361 exists <- File.exists path
361362 if exists
362363 then