[pkg-haskell-tools] 01/01: [FIX] bindMountDir for make-all.hs

[Alexandre Delanoë]

This is an automated email from the git hooks/post-receive script.

anoe pushed a commit to branch master
in repository pkg-haskell-tools.

commit 181cf59baf6f5096678cd0ff844235fb38e6a33f
Author: Alexandre Delanoë <anoe at debian.org>
Date:   Wed Aug 19 18:02:57 2015 +0200

    [FIX] bindMountDir for make-all.hs
---
 src/make-all.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/make-all.hs b/src/make-all.hs
index 3ebf3d1..3c46205 100644
--- a/src/make-all.hs
+++ b/src/make-all.hs
@@ -260,7 +260,7 @@ testBindMount :: Conf -> IO () -> IO ()
 testBindMount (Conf {..}) act = do
     -- Test if the bindmount directory works
     withTempDirIO bindMountDir $ \tmpdir -> do
-        Exit c <- cmd ["schroot", "-c", schrootName, "--", "test", "-d", tmpdir]
+        Exit c <- cmd ["schroot", "-d", "/", "-c", schrootName, "--", "test", "-d", tmpdir]
         if (c == ExitSuccess)
         then act
         else putStrLn $ unlines

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-haskell/pkg-haskell-tools.git