diff --git a/test/Handler/Utils/ZipSpec.hs b/test/Handler/Utils/ZipSpec.hs
index eca7d9c6a..b18dbe8ab 100644
--- a/test/Handler/Utils/ZipSpec.hs
+++ b/test/Handler/Utils/ZipSpec.hs
@@ -18,7 +18,7 @@ import Data.Time
 
 instance Arbitrary File where
   arbitrary = do
-    fileTitle <- joinPath <$> arbitrary
+    fileTitle <- (joinPath <$> arbitrary) `suchThat` (any $ not . isPathSeparator)
     date <- addDays <$> arbitrary <*> pure (fromGregorian 2043 7 2)
     fileModified <- addUTCTime <$> arbitrary <*> pure (UTCTime date 0)
     fileContent <- arbitrary