1 files changed, 2 insertions, 2 deletions

diff --git a/tests/System/Torrent/FileMapSpec.hs b/tests/System/Torrent/FileMapSpec.hs
index 90ba3ab9..23447e55 100644
--- a/tests/System/Torrent/FileMapSpec.hs
+++ b/tests/System/Torrent/FileMapSpec.hs
@@ -69,8 +69,8 @@ spec = do
       unmapFiles m
 
     it "no buffer overflow errors" $ do
-      m <- mmapFiles ReadOnly layout
-      writeBytes 5 "ddddddddd" m -- cause segfault
+      m <- mmapFiles ReadWrite layout
+      writeBytes 5 "ddddddddd" m
       unmapFiles m
 
       BL.readFile (fst (layout !! 2)) `shouldReturn` "dd"