summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--news.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/news.hs b/news.hs
index 7c824e0..7004398 100644
--- a/news.hs
+++ b/news.hs
@@ -46,7 +46,7 @@ main = do
hSetBuffering stdout LineBuffering
[url, delayString] <- getArgs
let delay = read delayString :: Int
- let bloom0 = Bloom.fromList (Bloom.cheapHashes 3) 1024 [""]
+ let bloom0 = Bloom.fromList (Bloom.cheapHashes 3) 4096 [""]
rec url delay bloom0
return ()
where