Put baked .htaccess in the correct directory

tdammers · Jun 5, 2017 · 7fccc18 · 7fccc18
1 parent 2e2af01
commit 7fccc18
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Web/Sprinkles/Bake.hs b/src/Web/Sprinkles/Bake.hs
@@ -87,7 +87,8 @@ runBake baseDir entryPoints app a =
 
 bakeHtaccess :: Bake ()
 bakeHtaccess = do
-    liftIO $ writeFile ".htaccess" defHtaccess
+    basedir <- use bsBasedir
+    liftIO $ writeFile (basedir </> ".htaccess") defHtaccess
 
 bakeApp :: Bake ()
 bakeApp = do